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ACTION REPLAY v5.0 


THE ULTIMATE UTILITY / BACKUP CARTRIDGE FOR THE C64/128 


+ Action Replay allows you to Freeze the action of any 
Memory Resident Program and makesa,complete back- 
‘Grid, that: 



















up to disk = 
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‘SUPER CRUNCHER — ONLY $9. 

+ ‘A ubity 10 tur your Action’ Replay 5 into a’ 
super powertul, program compactor. Reduce 
‘progrims by up to 50%! Further compact pro 
‘rams alreidy cruched by ARS's compactor 












GRAPHICS SUPPORT DISK - 
ONLY $19.99 : 
To take advantage of ARS's unique power, we 
‘havo prepared a sue ol graph suppor facies 
+ SCREEN VIEWER: View scroons i a ‘sido 
show sequence. 
+ MESSAGE MAKER: Add scrolling messages 
to ydur saved screens wih musi 
PROSPRITE: Atul ste editor. 
ZOOM LENS: Explode sectons of any saved 
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Screen Dump: P 
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2420 load load me 


processor and BK of onboard Ram, Acto* 


+ Freeze any program and ecter a ful machine code mantor. 
+ Full Monitor Features 





ound coisons. 
+ Unique Picture Save: Freeze and save any Hires Screen to tape or disk. Saved in Koala, Bling 


+ Compactor: Eticient cony 
+ Sing Fle: Al programs 

+ Unity Commands: Many addtional commands: Aut 
* Unstoppable Reset: Reset button to Retrieve System and Reset even so called Unstoppable 


Fuby Compatbe: Works wth 1$61/Cil, 1581, 1571 and wth C64, 128, or 128D (in 64 Mode), 





WARP 25 


disk serial Turbo. A typical backup wil reload in under 5 seconds. 
ah action repay you simpy save. 








wri Without special LSilogee 
leplay otters the words lastest Disk Serial Turbo. 





CODE CRACKER MONITOR 


jon Replays on Board Ram the program can be looked atin ts ENTIRETY. That 
the code in ts Frozen state notin a Reset state as wih competitors products. 


NIQUE FEATURES 





+ Simple Operaton: Just press the bution at any point and make a complete back-up of any* 
‘memory resident program to tape or isk 

joad: Al back-ups reload com 

1: View the Spite set trom the trazen program — save the Sprte — transfer the Spite 

from one game to another, Wipe out Sprites, view the animation on screen. Cri 


ely Independent ofthe cartridge at Turbo speed, 








18 custom 





‘on most programs — make yourse invincible, Disable Sprite’SpriterBack- 


ing techniques — 3 programs por disk 
8 singe fl for maximum compat 





6: you uso both ses, 
iy 

um, Append, Od, Delt, Linesaver, 
Pint ou any screen in 16 Gray Seales, Double size print options. 
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lable atone tme from an intergrated 
be Frozen to enter any Utity and the program is 





‘Acton Replay V gets its power, A special custom LSI chip 





8 the fo for is unmatched Freezo‘Restar power, No other 
power 

ROM — ONLY $16.99 Circle Reader 

V al the power of he new V5 0. Service Number 110 





DATEL 


RIO COMPUTERS 





800-782-9110 


MON-SAT 8AM-6PM (PACIFIC TIME) 


“ORDERS ONLY 


CUST SERVICE 
TECH SUPPORT 
702-454-7700 


TU-SA 10AM-6PM 
FAX: 702-454-7700 








DEEP SCAN BURST NIBBLER - $39.99 COMPLETE 
THE MOST POWERFULL DISK NIBBLER AVAILABLE ANYWHERE AT ANY PRICE! 


-Burst Nibbler is actually a two part 
1571 to a C-64 or C-12 


stem - a software package and a parallel cable to connect a 1541 or 


‘What gives Burst Nibbler its power? Conventional nibblers have to decode the data from the disk before it can 
transfer it using the Serial port bus - when non-siandard data are encountered they are beat. Burst Nibbler 


transfers data as raw GCI 
of the original. 


code via the parallel cable without the need to decode it, so you get a perfect copy 


-Will nibble up to 41 tracks -Copy a whole disk in under 2 min -Installs in minutes - no soldering required on 


1541 (1571 requires soldering) 
SOFTWARE ALONE - ONLY $19.99 


DIGITAL SOUND SAMPLER -Only $89.99 


*Rocord any sound digitally into memory and then replay it with 
astounding effects * Playback forwards/backwards with 
‘echo/reverb/ring modulation *Full sound editing and realtime 
‘offects menu with wavetorms *Powertul sequencer plus load & 
aye function *Line In - Mic In - Line Out and feedback controls 


MIDI 64 -Only $49.99 


“Full specification MIDI at a realistic price “MIDI In - MIDI Out - 
MIDI Thru *Compatible with Digital Sound Sampler and 
‘Advanced Music system 

MIDI CABLES (5 tt. professional quality) Only $°8.99) 


ADV. MUSIC SYSTEM -Only $29.99 


*Powerlul modular program for creating, editing, playing and 
printing out sheet music ‘Playback music through internal sound 
system or MIDI “Input music with the editor, plano keyboard 
emulator or a MIDI synthesizer “Contains 6 modules: Editor 
MIDI, Keyboard, Synthesizer, Linker and Printer 


MOTHER BOARD -ONLY $29.99 


*Accepts 3 cartridges “Power orv/ott any slot “Onboard fuse 
*Resot button “Save wear & tear on your expansion port 


CABLE ALONE - ONLY $19.99 





TURBO ROM II -Only $24.99 


*Replacemont for the actual kernal inside your 64 *Loads/saves 
most programs at 5-6 times normal speed "Inproved DOS 
Support including 10 sec. format "Programmed function kays: 
Load, Directory, Oid etc. “Return to normal kernal at the flick of a 
Switch “File copier *Special 1/0 loader ‘Lots more! “fitted in 
minutes "No soldering usually required 


ROBOTARM -Only $89.99 


“Full 5 axis movement with human like dexterity to manipulate 
small objects “Comes with C-64 interface & software, linger 
jaws, shovel scoop, magnetic attachment and 2 JOYSTICKS 
*Uses 4 D cells “Works with or without interface "22" total length 


ADVANCED ART STUDIO -Only $29.99 


*Windows, icons, pull down menus & pointing devices “Operates 
in HiRes mode *Full control over color attributes "16 pens, 8 
fandom sprays, 16 user definable brushes “Windows can be cut, 
pasted, inverted, enlarged, reduced, squashed, stretched, 

lipped & rotated °3 levels of magnification “Lines, points. 

rectangles, triangles, circles. & rays with elastic faciity “Solid & 
textured fill with 32 user definable patterns “All information on 
Screen - na need to switch between picture & menu “Compatible 
with keyboard, joystick, mouse & Keala Pad 








EPROMMER 64 - ONLY $69.99 


“Top quality, easy to use EPROM programmer for the 64/128 
"Menu driven software/ardware package makes programming, 
reading. vortying. copying EPROM'S simply teal ‘Program 
2716 the 27256 chips @ 12.5, 21 of 25 folts “Full feature 
‘systom - all functions covered including device check/verlly "Tha 
most comprehensive, triandly and bost value for the money 
programmer available for th 64/128 “Ideal companion for 
Suporom Expander 16k EBFOM board oc any EPROM projoct 
UV ERASER - ONLY $39,99 (Holds 4 EPROM'S) 


SUPEROM EXPANDER -Only $49.99 


*8 sockets each accept 8K thru 32K EPROM's *Onboard 
operating system - no programs to load *Menu driven - just 
press a key to load program "Select any slot under software 
Control “Code generator feature will take your own programs and 
turn them into auto start programs (Eprom burnor raquired) 


TOOLKIT IV -Only $14.99 


*Tho ultimate disk toolkit for the 1841 with more features than, 
most for loss *Absolute must {or Serious disk hacker *DISK 
DOCTOR V2 *HEADERIGAP EDITOR “DISK LOOK - recover 
Jost files "Disassemble any program from disk to screen or 
printer “File compactor *Fast disk copy ‘Fast file copy “10 sec 
formatter “Error edit “Much, much more! 


SMART CART CARTRIDGE -Only $59.99 
NOW YOU CAN HAVE A 32K CARTRIDGE THAT YOU 
PROGRAM LIKE RAM THEN ACTS LIKE ROM! 

“Battery backed to last up to 2 years “Make your own cartridges 

evon auto start types without tho need for an EPROM burner 
“Can be switched in/out via software "Tum your cartridge into a 
32K RAM DISK with our RAM DISK software - Only $14.99, 


ROBOTEK 64 -Only $64.99 

MODEL & ROBOT CONTROL MADE EASY 

* 4 output channels - each with onboard relay “4 input channels - 
each fully buttered TTL level sensing “Analog input with ful 8 bit 

‘AND conversion *Voice input for voice control “Software features: 

test mode, analog measurement, voice activate & digital readout 
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LAS VEGAS, NV 89121 


"Add $4.00 shippi 


handing nthe continental US. $7.00 -PR AK, Hi, FPO, APO™S10,00-CanadalMox 
VSM pieces $3. pare Fen Ge aie dinette Lit see ORDER: 

wicks Money Ordets/¢.© D: Accepted: Please call for return autnonzation mimbor alums 
9490 E. TROPICANA AVE. #67 Sibect a a 20% restocking fe: We reserve he night to subettte procucts of itersnt appearance but 
equal quaity and function fot tems pred above 


rices subject to change without notice. 
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Printer Ribbons 

Printer 

Brother M1009, M1109 .. 5.65 4.65 
Citizen 120D, 1800 5.75 4.75 
Commodore MPS 801 . 4.99 3,99 
Commodore MPS 802/1526 ., 5.99 4,99 
Commodore MPS 803 5.65 4.65 
Commodore MPS 1200/1250 5.75 4.75 
C. Itoh Prowriter Jr, 6.99 5.99 
Epson FX/MX/RXB0, FX/LX 800 . 3.99 2.99 
NEC Pinwriter 2200 6.99 5,99 
Okidata 80/82/83/92/93 2.99 1,99 
Okidata ML 182/183/192 5.25 4.25 
Panasonic K-XP 140/1524/1540 .. 6.99 5.99 
Panasonic K-XP 1080/1090 5.25 4.25 
Selkosha SP 800/1000/1200 5.75 4.75 
Star SG10 2.99 1.99 
‘Star NX10, NL10 4.99 3.99 
Star NX1000 5.75 4.75 


Quality Diskettes 


(Bulk-packed 5.25" DS/DD) 

Brand Name 25 50 
BASF (Black) 4441 
KAO (Black) 45.42 
KAO (Dark Blue) 49.45 


Other Products 


Diskette Holder (Holds 75 disks) $4.95 
Disk Drive Cleaning Kit (12 Cleanings) .... $3.25 
Disk Notcher (Use both sides of a disk) ... $4.95 


Order Info: 


All orders shipped same or next business day, Thoro 

Is an order procossing/packaging charge of $3. Ploaso 

‘add an additional shipping charge of $1 per 6 ribbons (or 

8 (oF fraction), $1 por disk 

ccleaner o disk notchor, 

sent UPS ground (UPS 2nd Day Air and Fedorai 
Expross availablo—ploaso call for details), 


American Micro Supplies 
6473 Crater Lake Hwy. 

kel Central Point, OR 97502 E>) 

800-678-5576 Ese 


Circle Reader Service Number 117 








BIBLE WITH 
LANDMARK) 


The Computer Reference Bible 


Here's what LANDMARK will enable you to do: 


SEARCH THROUGH THE BIBLE-—Find 
Phrases, words or sentences, 
DEVELOP TOPICAL FILES—Copy from the 
Bible text and search results then add your 
‘own comments and notes. 
COMPILE YOUR PERSONAL BIBLE~- 
‘Outline texts in color. Add notes, comments, 
and references. Make your Bible Study 
‘organized and on permament record! 
CREATE FILES Convert them for 
wordprocessors like Paperclip and GEOS. 
MAKE SUPPLEMENTARY STUDY FILES— For 
more specific study and developing 
translation variations. 


KIV or NIV ($10.00 royalty charge for NIV) 


$ 1 19.9 5 plus $4.00 shipping in 


cont.. U.S.A. $7.50 Canada, Overseas write, 
BOTH KJV and NIV for $189.95 plus $10.00 
NIV royalty and shipping charge, 


v1.2 for C64 and v2.0 for C128 


CALL OR WRITE FOR A 
FREE BROCHURE 


P.A.V.Y. Software P.O. Box 1584 
Ballwin, MO 63022 (314) 527-4505 
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COMPUTE! 
Publications 


Back Issues/ 
Disk Orders 


Individual back copies of maga- 
zines and disks are available by 
mail only while quantities last. 


Please clip or photocopy, and mail 
completed coupon and check to: 


COMPUTE! Publications 
Single-Copy Sales 
P.O. Box 5188 
Greensboro, NC 27403 


Name: 
Stroet 

Cty 

State: ___ zip: 


‘Type of computer: 





Issue Magazine 
Quantity |(Month/Year)| or Disk Name | Price" 









































SUBTOTAL: 
Sales Tax:t 
Shipping: 
TOTAL: 


* Back issues of COMPUTE!, and COMPUTE!'s Ga- 
zotte are $6.00 each, No issuo8 dated prior to Janu- 
ary, 1986, are available, In addition, the folowing 
Issues are NOT available: Gazette: 1/86, 3/86, 4/86. 

* Single disks for COMPUTE?'s Gazetto are $15.00 
Disk/magazine combinations are $16.00 NOTE: No 
disks dated prior to June 1986 are available. The 
May 1986 and October, 1987 Gazetto disks are no 
longer available, 

* Back issues of COMPUTE!'s PC Magazine aro 
$16.00 each. This publication is available only as a 
magazine/disk combination, Our back issue inventory 
Consists mainly of magazines with 5.25-inch disks, 
‘but we wall attempt to supply 3.S-inch disks if re- 

ted. Tho following issues are NOT available; PC 

Magazine: 9/87, 11/87, 3/88, 9/88, 11/68, 

* Back issues of COMPUTE!'s Amiga Rosouce maga- 
zino are avalablo beginning with Spring, 1989 for 
'$6,00 each, Back issues of COMPUTE'S Amiga Re- 
source Disk aro availablo beginning wth Summer, 
1989 for $10.00 each, Disk/magazine combinations 
are $12.00, 

‘Shipping and handing included for U.S. and Ca- 
nadian residents. Others add $2.00 for surface mail, 
$5.00 for air mail 

Payment must be in U.S. dollars by check drawn on 
US. bank. MasterCard or Visa credit cards accepted 
‘on orders of more than $20.00. 
































+ North Carolina, New York, and Pennsylvania res- 


dents must add appropriate sales tax, 
207 
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GAZETTE 
D\SK L/BRARY 


VALUE-PACKED SOFTWARE 
AT AFFORDABLE PRICES 


All Gazette disks are menu-driven for ease of use—and they feature complete 
documentation. Just load and you're ready to go! 


SpeedsScript $11.95 
COMPUTE! Publications’ most popular program 
ever, Powerful word processing package includes 
SpeedScript for the 64, SpeedScript 128, spelling 
checkers for both 64 and 128 versions, plus an 
additional dozen support programs, including 
mail-merge and word-count utilities. 


Gazette's Power Tools $9.95 
Fourteen of the most important utilities for the 

64 ever published in Gazette. For serious users. 
Titles: MetaBASIC, Disk Rapid Transit, Mob Maker, 
Ultrafont+, Quick!, Disk Editor, Basically Music, 
PrintScreen, 1526 PrintScreen, Fast Assembler, 
Smart Disassembler, Comparator, Sprint Il, and 
Turbo Format. 


Best Gazette Games $9.95 
Best dozen arcade and strategy games ever 
published in Gazette all on one disk. All games for 
Commodore 64, Titles: Crossroads I; Pandemo- 
nium, Basketball Sam & Ed, Delta War, Heat 
Seeker, Omicron, Powerball, Q-Bird, Trap, Arcade 
Volleyball, Mosaic, Power Poker, and Scorpion II. 


Gazette Index $7.95 
Every article and department fromm Gazette—July 
1983 through December 1989 issues—is indexed: 
features, games, reviews, programming, Bug- 
Swatter, Feedback, and the other columns, Disk 
features pull-down menus, help screens, superfast 
searching/ sorting capabilities, and much more. 


The GEOS Collection $11.95 
Gazette's best 13 programs for GEOS and GEOS 
128 users. Selection includes utilities, applications, 
and games. Titles: Super Printer Driver, Skeet, File 
Saver, Help Pad, Word Count, Directory Printer, 
Quick Clock, SlideShow, File Retriever, Screen 
Dumper, Font Grabber, GeoPuzzle, and 
GeoConverter, 


128 Classics $11.95 
Thirteen of Gazette's best 128 programs, including 
utilities, games, and applications. Titles: 
MetaBASIC 128, RAMDisk 128, 80-Column Disk 
Sector Editor, MultiSort, Block Out, Miami Ice, 

The Animals’ Show, Cribbage, XPressCard, Sound 
Designer, Video Slide Show, Math Graphics, and 
8-D BarGrapher. 











- SPECIAL OFFER! All 6 DISKS FOR ONLY $49.95! A $13.00 SAVINGS! : 
| All prices include shipping & handling. Name. i 
: Speedscript O $11.95 Address 4 
Gazette's Power Tools O $ 9.95 
I Best Gazette Games O $ 9.95 en ahaa i e 4 
Gazette Index O $ 7.95 enclosed § Payment Check of Money Order 
H We ee Collection 5 % 4 ne TIVISA of Mastercard 1 
lassics i 
r] Mall to: Gazette Disks aN alana dn nL 
H Special 6-Disk Offer O $49.95 ese H 
| Subtotal Greensboro, NC 27403 i 
| State Sales Tax” Credit card no. Exp. date | 
- Outside U.S, or Canada** Signature (required) 4 
Total Daytime phone number 
q * Residents of New York, Pennsylvania, and North Carolina add appropriate soles tax. i 
I For doivery outsite the US. oF Canada, add $1 for surface mal or 83 for akmall All orders must be in U.S, funds drawn on 9 US. bank i 
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Learn to troubleshoot and service today’s 
computer systems as you build 


a fully AT-compatible micro, 


complete with 1 meg RAM ang 
powerful 20 meg hard drive 


Train the NRI Way— 
and Earn Good Money Servicing 
Any Brand of Computer 


Jobs for computer service technicians will 


almost double in the next 10 years according 
to Department of Labor statistics, making 
computer service one of the top 10 growth 
fields in the nation. 

Now you can cash in on this exciting 
opportunity—either as a full-time industry 
technician or in a computer service business 
of your own—once you've mastered 
electronics and computers the NRI way. 

NRI’s practical combination of 
“reason-why”’ theory and hands-on building 
skills starts you with the fundamentals of 
electronics, then guides Aen through more 
sophisticated circuitry all the way up to the 
latest advances in computer technology. 
You even learn to program in BASIC and 
machine language, the essential language 
for troubleshooting and repair. 


Get Real-World Skills as You Train 
With a Powerful AT-Compatible 
Micro—Now With 20 Meg Hard Drive! 


To give you hands-on training with the 
absolute in state-of-the-art computer 
technology, NRI includes the powerful new 
‘West Coast 1010 ES computer as the center- 
iece of your training. As you assemble this 
IBM AT-compatible micro from the 
key) up, you actually see for yourself 
how every section of your computer works. 
You assemble and test your computer's 
“intelligent” keyboard, install the power 





supply and 1.2 " floppy disk drive, 
then interface the Righresolution monitor. 
But that’s not all. 


Your hands-on training continues as 
you install a powerful 20 megabyte hard 
disk drive—today’s most-wanted computer 


IME DOSiENEAASIC, wd jensieg, 
spreadsheet, programs 
‘Tieternce manuals wth programmniag 
guidelines and 


peripheral—now included in your course to 
dramatically increase the data storage 
capacity of your computer while giving you 
lightning-quick data access, Plus you work 
with exclusive word processing, database, 
and spreadsheet software, yours to use for 
your own professional and personal 
‘applications, 

As you build your computer, 
performing key demonstrations an 
experiments at each stage of assembly, you 
get the confidence-building, real-world 
experience you need to work with, 
troubleshoot, and service today's most 
widely used computer systems. 





No Experience Needed, NRI Builds It In 


This is the kind of practical, hands-on 
experience that makes you uniquely 
prepared to take advantage of today’s 
opportunities in computer service. You learn 
at your own convenience in your own home, 





SEND COUPON 





McGraw-Hill Continuing Education Center 
4401 Connecticut Avenue, NW, Washington, DC 20008 


‘CHECK ONE FREE CATALOG ONLY 
CD Compaters& Microprocessors c 
Video! Audio Servicing 
botica 

lectronic Music Technology 
Security Electronics 
Digital Electronics Servicing 















AY FOR FREE NRI CA’ 
Mer ua 


O Telecommunications 
asic Electronica 
Bookkeeping and Accounting 
juilding Construction 

Tl Automotive Servicing 







NEW! 


Now includes 
AT-compatible 
computer! 


No classroom pressures, no night school, no 
need to quit your present job until you're 
ready to make your move. And all 
throughout your training, you've got the full 
support of your personal NRI instructor and 
the NRI technical staff, always ready to 
answer your questions and help you 
whenever you need it. 


FREE 100-Page Catalog Tells More 


Send today for NRI's big, 100-page, full- 


color catalog that describes every aspect of 
NRIs innovative computer training, as well 
as hands-on training in robotics, video/audio 
servicing, electronic music technology, 
security electronics, telecommunications, 
ad ote growing high-tech career fields, If 
the coupon is missing, write to: NRI School 
of Electronics, McGraw-Hill Continuing 
Education Center, 4401 Connecticut Avenue, 
NW, Washington, DC 20008. 


TBM and AT ary registered trademarks of International 
‘Business Machines Corporation 









re | 
Travel Careers 

OWriting 

GParalegal 











Name (Please prin) Ree | 
Street 

Ty Seay 
Elise) 6, oe Accredited Member, National Home Study Council '*0% 





I: case you haven‘t heard, Commodore reported a 
$6.5 million loss for the quarter ending September 
30, 1989. At this writing, we're waiting for word on the 
following quarter (translation: Commodore's Christ- 
mas). Commodore won't release its bottom-line num- 
ber until after you read this, so we'll follow up in one of 
our next couple of issues, 

Commodore blamed its poor third-quarter per- 
formance on slumping 64 sales and added that Amiga 
and PC-compatibles sales were up compared with last 
year’s third-quarter sales, - 

Despite the bad quarter, Commodore appeared to 
be in general good health. We'll soon see how the all- 
important fourth-quarter results affect the company’s 
vitality. 

We've heard through the grapevine that the ru- 
mored 64 upgrade machine—dubbed the 64cs by 
yours truly in the September 1989 ‘Editor's Notes” 


TOR 
notes. 





VIDEO BYTE II the only FULL COLOR! 
video digitizer for the C-64, C-128 


Introducing the world’s first FULL COLOR! video digitizer for the Commodore C-64, 64-C, 
€-128, & 128-0 computer. VIDEO BYTE can give you digitized video from your VCR., LASER 
DISK, B/W or COLOR CAMERA or OFF THE AIR or CABLE VIDEO (thanks to a fast! 2.2 
sec, scan time), New version 3.0 software features full RE-DISPLAY with MULTI CAPTURE 
MODE, BUILTIN PRINTING MODE, EXPANDED COLORIZING MODE, FREEZE COLOR fea- 
ture and much, much more! 


FULL COLORIZINGI Is possible, due to a unique SELECT and INSERT color process, where 
you can select one of 15 COLORS and insert that color into one of 4 GRAY SCALES. This 
rocess will give you over 32,000 ctferent color combinations to use in your video pictures. 
SAVES as KOALAS! Video Byte I! allows you to save all your pictures to disk as FULL COLOR, 
KOALAS. After which (using Koala or suitable program) you can go in and redraw or color 
your V.B. pics 

LOAD, DISPLAY & PRINT Video Byte I! allows you to load, display & print all VIDEO BYTE 
or KOALA pictures trom Video Byte's menu, 

MENU DRIVEN! Video Byte Il comes with easy to use menu driven UTILITY ISK with 
30 video digitizer program. (64 MODE ONLY), 

COMPACT! Video Byte Il is compact! In fact no bigger than most cartridges! VB II (plugs 
into MODEM PORT) comes with 3° cable. 

INTEGRATED! Video Byte Il is designed to be used with or without EXPLODE! V5.0 color 
cartridge. Explode! V5.0's menu will return you to VIDEO BYTE I's menu, EXPLODE! V5 
{s the PERFECT COMPANION! AT ONLY $44.95 or W/DISABLE SWITCH $49.95, 

FREE! Video Byte Il users are automatically sont FREE SOFTWARE updates along with 
‘new documentation, when it becomes available 

PRINT! Vidoo Byte I! will printout VB or KOALA pictures in 4 GRAY SCALE to most printers, 
However when used with Explode! V5.0 your printout’s can be done in FULL COLOR 8 
by {1's SIDEWAYS on the RAINBOW NX - 1000, RAINBOW NX - 1000 C, JX - 0, Seikosha 
3000 Al. (OKIDATA 10/20's (print larger 6” by 9") 

USER SLIDE SHOW program w/auto or manual display is standard 
with VIDEO BYTE program. And can be backed up! Why DRAW a 
caf, aitplane, person or for that matter... anything when you can 
VTE it. .. VIDEO BYTE it instead! 

All units come w/90 day WARRANTY. All orders add $3 for UPS BLUE LABEL S/H, UPS BLUE available: 
only in 48 states. FOREIGN ORDERS are US FUNDS +$635 S/H. ORDER BOTH EXPLODE! V5 & VIDEO. 
BYTE Ii together and receive FREE! UPS S/H. ***Note all SALES are FINAL, 90 DAY WARRANTY covers. 
PARTS & LABOR ONLY. All SOFT GROUP UTILITY DISKS COME w/bullt-in CATALOG of PROOUCTS. 


























“IN 64 MODE ONLY TO ORDER CALL 1-708-851-6567 IL RESIDENTS ADO 6% SALES TAX PLUS $300 
‘S/H. NO CD'S. FOREIGN ORDERS US. FUNDS ONLY $635 S/H, Personal Checks 10 Days to Clear 
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and the Commodore 65 in other quarters—will not be 
delivered. Too bad, It sounded like an interesting ma- 
chine with some potential. 


Prrrrurrr erry 


COMPUTE! Publications attended the annual World of 
Commodore show in Toronto this past December, We 
set up our booth and manned it with a variety of edi- 
tors, including those from our two Commodore maga- 
zines, Amiga Resource and Gazette. We had lots of 
magazines and disks on hand, and, based on our expe- 
rience from the previous two 1989 Commodore shows, 
we anticipated that most of the interest would be cen- 
tered around our Amiga products. Much to our sur- 
prise, there was, instead, even more interest in Gazette 
and our 64/128 disks. 

Our Canadian readers, slightly more than 10 per- 
cent of our audience, never fail to amaze us with their 
knowledge of hardware and software, as well as their 
historical knowledge of Gazette. One of our editors, ob- 
viously impressed, told me that one Canadian reader 
knew more about Gazette than any of us did. ; 

Our hats are off to our Canadian readers. They're a 
special group. The letters and suggestions we get from 
north of the border are usually intelligent, observant, 
and always gracious. Meeting with this group, if only 
once a year, is a real treat for us. 





A reminder: If you'd like to offer input as to how Ga- 
zette can better serve you, send in the Gazette Reader- 
ship Survey from the December 1989 issue. We read 
each of the responses and tabulate the results, 

This is the third year we've run such a survey. 
Each time that we've charted the results, we've made 
changes in the magazine based on what you've told us, 
We'll do the same again this year. 

The sole purpose of the survey is to see how we're 
doing for you, what you like and don’t like, and how 
we can better shape the magazine for your needs. We 
have hundreds of responses in and tabulated (a sneak 
preview of the early returns is in this month’s ““Hori- 
zons’’ column), but it’s not too late to write in and be 
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Lance Elko 
Associate Publisher 








Send questions or comments to Letters 
to the Editor, COMPUTE!’s Gazette, 
P.O, Box 5406, Greensboro, North 
Carolina 27403, We reserve the right 
to edit letters for clarity and length. 


The Right Joystick 
I'd like to comment on the review of 
The Final Cartridge III [January]. Art 
Hunkins reported that a mouse was 
necessary in order to use the desktop 
feature of the cartridge and that joystick 
mode is nearly impossible, Well, Art 
apparently doesn’t own a decent joy- 
stick. I've owned my Final Cartridge III 
for more than a year now, and I use an 
Epyx 500XJ joystick. I can tell you with 
great confidence that this inexpensive 
joystick is almost as good as using a 
mouse and works equally well with 
GEOS. Cheer up, Art... the rest of the 
article was pretty good. 
Robert L. Rappaport 
Key West, FL 


Bad Taste? 
In the past few months, I’ve noticed an 
increasing occurrence of advertising 
that appeals to the sensual. I under- 
stand that Gazette does not design the 
ads, and that advertising is essential to 
the economic survival of any magazine. 
It has reached the point where | am em- 
barrassed to read my Gazette in public. 
Please share my concern with those 
who advertise in your magazine. 
Clark Lindsay 
Dunbar, WI 


SpeedSeript on Disk 
I've found SpeedScript to be better than 
the commercial word processor I had 
been using, I recall that you published a 
spelling checker for it a few years ago. 
Can you reprint Also, I find the 
question “Tape or Disk?” (asked every 
time you want to print or save) to be a 
waste of time. I'll bet nearly everybody 
who uses SpeedScript has a disk drive. 
EF. S, A, Johnstone 
Ont., Canada 





We published a SpeedScript spelling 
checker (SpeedCheck) in the December 
1985 issue of Gazette. We also published 
a version for the 128 (SpeedCheck 128) 
in the September 1988 issue. All 1985 
issues are no longer available. The 1988 
issue is, however, available. 


We recommend that you consider 
purchasing COMPUTE!’s SpeedScript 
Disk, which contains both versions of 
SpeedScript, both spelling checkers, and 
a host of other support utilities for both 
the 64 and 128 versions. (An ad appears 
elsewhere in this issue.) The “Tape or 
Disk?” prompt is conspicuously absent in 
the disk version. 


Thanks to Readers 

A special thanks to those readers who re- 
sponded to Kristine Cipra’s request for 
accounting-program recommendations 
(“Reader Advice, Please," December). 
Since there were a variety of responses (no 
one package dominated the suggestions), 
we have forwarded letters to Kristine. 


Good Report 
I've discovered that Commodore's cus- 
tomer support which everyone is quick 
to put down is really quite good. I re- 
cently wrote to Commodore about not 
receiving a manual and a registration 
card with my 1084. Within a week, I re- 
ceived both along with a letter of apolo- 
gy from a customer support person. I 
don’t know about anyone else, but to 
me that’s outstanding support. 
Ronald W. Waid 
Philadelphia, NY 


Lest We Forget 
Just a little nitpicking comment. In the 
December issue, you carried the pro- 
gram 80 X 50 Display. In the article, 
you mentioned that the VIC-20 had a 
22 X 25 character screen. It's 22 X 23. 
I got rid of that archaic beastie, but I 
still remember a lot about it. 
Rod Reddekopp 
Yorkton, Sask., Canada 


Right you are. We used to cover the VIC 
quite extensively, but it seems we've got 
some bad memory chips here at the COM- 
PUTE! office. 


Dendrites in Dispute 

The illustration for Neural Networks 
[January] is incorrectly labeled. The 
short, red fingerlike projections ex- 
tending from the cell body are the 
dendrites. Their function is to carry 
messages from the synapses to the cell 
body. The blue projections, which are 
labeled as dendrites, are actually the 
ends of the axons, which carry mes- 
sages away from the cell body to the 





synapse. Finally, the axon label, al- 
though technically correct, is actually 
pointing to part of the myelin sheath, 
which is an insulating wrap around 
the axon. 
Craig D. Slattery 
Wapakoneta, OH 


Thanks, Craig—you're absolutely right. 


VIC Help 

I found myself in complete agreement 
with the reader searching for programs 
for his VIC-20 and Plus/4 [Call for 
VIC-20 and Plus/4 Software,” Novem- 
ber]. I’ve been going bananas trying to 
find software. 

To respond to the reader's direct 
question, I’ve found all of my programs 
at the public library. My branch carries 
some Family Computing issues and, 
more importantly, COMPUTE! and Ga- 
zette going back far enough to carry 
some VIC programs. I’ve also been able 
to receive some VIC books through the 
interbranch library system. Another av- 
enue to explore is user groups. Com- 
puter Shopper runs a list of user groups 
broken down by state. Each group has 
in its listing the names of the computers. 
they support. There were lots of Com- 
modore groups listed, and at least two 
mentioned the VIC. I’ve written to 
some but haven't received a response 
yet, One more idea: If the reader has ac- 
cess to an IBM PC or compatible with a 
modem, Computer Shopper runs a list of 
BBSs by state. He could tie into one of 
those and find out if they carry a “For 
Sale” conference. Post a message ask- 
ing for VIC-20 or Plus/4 equipment. Be 
prepared to wait for an answer, 
though—I’m just now getting some 
feedback after three months of waiting! 

Also, I'd love to find some out-of- 
publication copies from COMPUTE!’s 
series of titles for the VIC. 

Edward J. Rhodes 
Newport, RI 


Some excellent ideas here. Don't forget 
that in every May and June issue Gazette 
publishes a comprehensive list of Commo- 
dore user groups (many with BBS num- 
bers) as well. Incidentally, back issues of 
Gazette before 1986 are out of print, as 
are all the VIC titles published by COM- 
PUTE! Books. But, we're fairly certain 
that some libraries will have copies of 
these magazines and books, G 
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Rhett Anderson 


No matter what the system—Atari 
2600, Commodore 64, Nintendo, IBM 
PC—programs just keep getting better 
and better. Because I claimed lack of in- 
spiration for this month’s “Horizons,” 
Associate Publisher (I knew him back 
when he was just an editor) Lance Elko 
suggested that I discuss this phenome- 
non. I liked the idea so much that I 
scrapped the half-column I had already 
written, 

First, an experiment. While reading 
this sentence, carefully walk over to 
your software shelf. Don’t trip over fur- 
niture, pets, or family members as you 
do this, Now, while reading this sen- 
tence, look out of the corner of your eye 
and find your first favorite game for 
your computer. Next, find your current 
favorite game. 

If you’re not the type to play 
games, this experiment also works with 
productivity software, but because 
games stretch the machine more than 
any other category of software, we'll be 
able to go further in our scientific 
quackery if you can nab a pair of enter- 
tainment titles. 

Fire up your computer and boot 
the older game. Check out the title 
screen, the music, the graphics, the ani- 
mation, the sound effects, Now try the 
second game and compare. 

Old-timers will notice the most 
change—the longer the gap between 
the two programs, the more obvious 
and significant the differences. 

With this experience in mind, let’s 
take a closer look at the programmer 
and his or her tools. 


Cold Pizza and Inspiration 

Because programming is largely misun- 
derstood by the outside world, pro- 
grammers tend to run in packs. While it 
would be stretching the facts to say that 
they all walk alike and talk alike or that 
they all have the same diet and taste in 
music, they do look out for each other. 
Trade secrets don’t last long. Program- 
mers are anxious to brag about what 
they've done, so source code streams 
along the telecommunications wires 24 
hours a day. 

That's one reason programs get 
better. Each programmer contributes a 
few tricks to the taming of the machine. 

Tools get better, too. One of the 
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best tools that ever came out for design- 
ing Commodore 64 games was the 
Commodore Amiga. Artists draw 
Screens, characters, and objects with 
the excellent Amiga paint and anima- 
tion programs. Then the programmers 
write routines to convert the Amiga im- 
ages to 64 images. While the images 
lose a bit in translation, they look far 
superior to the images created from 
scratch on the 64, 


The Road Taken 

Let's take a closer look at the 64 (the 
128, from a game player's point of view, 
is essentially the same machine). The 64 
was preceded by the Apple II, the Atari 
800, and the VIC-20. It wasn’t surprising, 
to anyone when the first Commodore 64 
games looked exactly like Apple, Atari, 
and VIC games. In fact, some of the first 
64 games copied the other versions so 
closely that they didn’t even use the 64’s 
hardware sprites. 

Soon, programmers felt their way 
through the 64 and began to take ad- 
vantage of its considerable strengths: 
color memory, sprites, expansive RAM, 
and three-channel sound. A spate of 
books arrived, detailing the hardware 
and system software. Soon, the 64 was 
the most popular home computer. 

For a while, programmers almost 
overused the 64’s special talents. Often, 
for instance, nothing on the screen 
would move but the sprites. Since 
sprites can take up only a small percent- 
age of the total screen area, many pro- 
grams started to look the same. 

To break out of the pack, program- 
mers had to do more. With the intro- 
duction of the PC’s EGA mode and the 
Amiga and ST computers, program- 
mers had new goals to work toward. 


The Outer Limits 
Have we seen the best? What we've 
seen is close, The 64 has definite, un- 
avoidable limitations. It has only 16 
colors out of a palette of 16. EGA has 16 
out of 64. The Amiga has 32 out of 
4096. Memory is a big problem. Digi- 
tized sound samples (which pale in 
comparison to Mac or Amiga sound) 
take up huge amounts of RAM. Resolu- 
tion is limited to 320 X 200. Commo- 
dore 64 disks drives are slow, and the 
disks don’t hold much. 

So, we've come close to the limit. 
As close as is economical, anyway. It’s 


Computer Science 


certain that today’s games would have 
stunned yesterday's game players. 


Ear to the Ground 

The rumors of the Commodore 65—an 
enhanced Commodore 64—remain. 
Since the 128 is out of production, and 
the 64 is rumored to be out of produc- 
tion, many people see the 65 as the 
Commodore 8-bit line’s last chance. 

Many of the user group newslet- 
ters I see make mention of the 65, I my- 
self have never seen one. I’ve never 
even talked to anyone who has seen 
one. If any of you have seen a 65 proto- 
type machine, please drop me a line 
and tell me your story. I'll keep it confi- 
dential. If you'd like, I'll eat your letter 
when I'm through reading it. 

My prediction on the situation: If 
Commodore doesn’t sell enough Ami- 
gas by fall to make believers out of an 
increasingly skeptical marketplace, it 
will scale back the company, release the 
65, and try to become (once again) ev- 
eryone’s favorite low-end computer 
maker. 


Sneak Preview 

I've managed to sneak a look at some of 
the early returns of the 1989 Reader- 
ship Survey. 

Some of your responses surprised 
me. For instance, more than 90 percent 
of you use the programs published in 
Gazette. The majority of you type them 
in, That's encouraging. When asked to 
rate the quality of our programs, most of 
you gave us an 8, a9, ora 10 (out of 10). 

Most of you want to hang on to 
your current computers. Of those who 
want to buy a new one in the next year, 
most want an Amiga (37 percent), Next 
come the PC (28 percent) and the 128 
(19 percent). 

Well, I'll stop pulling my material 
out from under the editor. I’m sure 
you'll find out more about the survey 
when the final results are in, 


Old Business 

Alan Shotzbarger from Solon, Ohio 
(I've actually eaten at a McDonald’s 
there, Alan), wrote to tell me that he 
votes in favor of voting by computer. 
He believes that our method of democ- 
racy could use an overhaul. He says 
“By allowing computerized voting, 
every individual would have the oppor- 
tunity to be heard equally.” G 
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+ Four modes of operation: 1541, 1571, 1581 emulation modes for 
compatibility and Native mode with up to 16 Mb partitions, 


+ Built-in *GEOS™ and *CP/M™ compatibility. 


+ Standard capacities of 20, 40 and 100 Megabytes with custom 
Capacities in excess of 200 Megabytes. 


Serial bus Interface supports Standard Serlal as well as 
high-performance Fast Serial and JiffyDOS protocols, 


3.1/2" SCSI technology allows for quiet, coo! reliable operation 
in a compact case about the same size as a 1581 drive. 


Can be interfaced with Amiga, IBM - compatible and Macintosh 
computers, allowing you to take It with you when you upgrade, 


Built-in real time clock for time and date stamping of files. 


CraD 











Our goal was to design a reasonably priced drive which was easy to previously thought of as impossible in any disk drive has become 
use, and we've done just that, We challenge you to compare our HD reality. Features such as the SWAP function allow you to operate 
series toany other hard drives ever available for the 64 and 128.CMD software which only recognizes a specific device, The built-in 
HD hard drives utilize the latest hardware technology and operate SCSI controller allows expansion of your system to over 4 Giga- 
using the most innovative disk operating system ever made available bytes of storage, as well as allowing connection to other types of 
10 64 and 128 owners. CMD engineers were inspired to createa hard computers. So while other companies are willing to let your 64 or 
drive which overcomes the problems inherent in earlier designs, As 128 become obsolete, CMD is taking your 64 and 128 into the '90's. 
a result, the evolution of new features and a level of compatability CMD HD Hard Drives are available now, order yours today ! 


* GEOS ix a Trademark of Berkeley Seftworks + CPIM is a Trademark of Digital Research 
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et * Quick printer output toggle. Asimp 
tite key command switches output from screen to 

+ Enhanced text screen dump. Automatic pri ind back: ase. Eliminates having 

screen mode recognit printing of up to typo the complicated OPEN4,4:CMD4 and 
PRINT#4:CLOSE4 command sequences. 
+Redefinable 64-mode function keys. + Adjustable sector interleave. Enables 
Allows you to easily redefine the function keys you!oincrease disk-access performance even 
{0 suit your specific needs. with hard-to-speedup software, 





Hard Drive Ordering Information JiffyDOS Ordering Information 
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Fred D'Ignazio 


Over the past few months, I’ve received 
hundreds of letters from Gazette readers 
as part of The Great Commodore /Nin- 
tendo Debate. The letters have been 
outstanding, Encouraged by the quality 
of your responses, I’ve decided to turn 
to you for advice on a project I’m in- 
volved with here in Michigan. 

I'm working with high-level state 
officials in Michigan to create a pro- 
gram that will be called Michigan 
Classrooms of Tomorrow. Michigan 
teachers who sign up for the program 
will get $20 million worth of computers 
for their classrooms. To qualify, the 
teachers will have to show how they 
will use the computers to create a class- 
room of tomorrow, The computers will 
help teachers try out new methods of 
teaching and learning that will prepare 
their students for the twenty-first cen- 
tury as citizens, parents, and workers, 


New Strategies 

Here are some of the strategies Michi- 
gan teachers can explore with their stu- 
dents, using computers: 


* Cooperative Learning. Students work 
as teams, They help each other learn 
and don’t let anyone fall behind, The 
teams solve problems together, create 
class speeches, and demonstrate what 
they've learned using the computer. 


* Critical Thinking. Teachers turn over 
the responsibility for learning to their 
students, The students gain a lot of in- 
dependence and get to make a lot of 
their own decisions. However, they 
must be more self-reliant, manage their 
classwork and homework, and solve a 
lot of problems on their own, They use 
a computer to help them work, 


* Classroom Publishing. Students 
choose projects that have a natural 
audience—parents, younger students, 
senior citizens, and so on. They re- 
search a subject, gather materials, and 
create publications using their com- 
puter. The publications might be on 
disk, audiotape, videotape, or paper 
(like a class newspaper or flyer). 


+ Apprentice Learning. Students take on 
the role of apprentice teachers, They 
learn how to read, write, do math, and 
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study geography the way a teacher 
does—so they can share their new 
knowledge with their classmates. Stu- 
dents are graded not by what they 
know, but by how well they share what 
they know with others. 


* Thematic Teaching, Students no long- 
er study one subject at a time, Now they 
try to see connections between math 
and reading or between history and sci- 
ence. They learn subjects as part of larg- 
er thematic units such as whales, the 
greenhouse effect, homeless people, 
technology, religion, migration, and so 
on. They learn how to use the tools of 
science, math, and so on, to interpret 
information and share it with others. 


A New Kind of Classroom 
What will a classroom look like in the 
year 2000? 

That used to be a question asked 
only by futurists and crystal-ball gaz- 
ers. Now it’s a question for all of us. The 
year 2000 is only ten years away. 

I've made a futuristic proposal to 
Michigan educational officials. In the 
year 2000, I said, students won't learn 
from textbooks or teachers. Textbooks 
contain warmed-up, leftover knowl- 
edge that is largely outdated, Teachers 
can’t keep up with knowledge on all 
fronts or with the tools that can deliver 
knowledge to their students—tools like 
computers, laserdiscs, satellite TV, 
compact discs, compressed video, fiber 
optics, and so on. 

In the year 2000, teachers and stu- 
dents will learn together as knowledge 
explorers. They'll choose topics pulled 
from current events, family life, and lo- 
cal politics, And they'll send student 
and teacher teams out into the real 
world on electronic field trips to investi- 
gate these topics as they gain practice 
with tools for investigation including 
statistics, reading, writing, the scientific 
method, and graphic arts. 

Education in the year 2000 will be a 
lot like a good computer game, A student 
on an electronic field trip will still be sit- 
ting in the classroom, but he or she will 
also be an electronic telepresence, able 
to use electronic eyes and ears and jour- 
ney around the globe, explore the seas, 
or blast off to a distant planet or 
moon—just like a character in a com- 
puter game! Student workstations will 
be like flight simulators used by 


Classrooms of Tomorrow 


NASA’‘s astronauts and commercial air- 
line pilots. Information will be dis- 
played in various windows on the 
computer screen—animation windows, 
number windows, text windows, and 
so on, Student explorers will interview 
scientists, experts, policymakers, and 
other decision makers. They will turn 
their interviews into computer games 
and get practice solving real-world 
problems and searching for solutions to 
the same problems that are stumping 
the experts. 


Help! 

This is the proposal that I made to 
Michigan officials as part of their Class- 
rooms of Tomorrow program, We need 
to work toward tomorrow, I said, by 
starting today, We need to look at the 
best computer games and see how they 
can be transformed into powerful learn- 
ing experiences that turn students on to 
learning, help them link together the 
continents of knowledge, and carry 
them into the twenty-first century. 

But I'm no gamer. I depend a lot on 
my 10-year-old son, Eric, and my 13- 
year-old daughter, Catie, to advise me, 
but I need more help. A lot more. 

If you play computer games and 
would like to help the state of Michigan 
plan its classrooms of tomorrow, please 
write me, Tell me how we can use com- 
puter gaming techniques in the class- 
room to help students learn their 
subjects, What powerful learning skills 
do games develop? How can these 
skills be used in classroom learning? 

Be specific, Diagram a map of the 
classroom of tomorrow and show me 
how the students are grouped, what 
equipment is used, and so on, What 
does the school day look like? Is it di- 
vided into periods as it is now, or is it 
centered around students’ projects? 

Read this article again; then jot 
down your ideas, pictures, suggestions, 
and so on, and send them to 


Fred D'Ignazio 

c/o COMPUTE!'s Gazette 
324 W. Wendover Ave. 
Suite 200 

Greensboro, NC 27408 


I'll publish the most innovative 
ideas in an upcoming column. And, 
thanks! Kids all over Michigan will ben- 
efit from your thinking, 6 








Ancel Bhagwandeen 


Branch to labeled subroutines with 
this short but powerful enhancement 
for BASIC 2.0. 


Commodore 64 BASIC is a good general- 
purpose language, but it lacks a certain 
feature offered by many languages. 
Specifically, it won't allow you to 
branch to labeled routines, Instead of 
being able to use meaningful labels 
such as CHECKFORINPUT or BUILD- 
SCREEN, you're forced to use obscure 
line numbers. 

BASIC Labels is a machine lan- 
guage routine that gives BASIC 2.0’s 
GOSUB and GOTO statements the 
ability to branch to labels, With it, you 
no longer have to guess where an un- 
written subroutine will begin, Just give 
it a label and the line number becomes 
irrelevant. 

Furthermore, with BASIC Labels 
you can branch to the middle of a pro- 
gram line. Normally, the GOSUB and 
GOTO commands transfer program 
control to the start of a designated line, 
Now, you can position a label at any 
point within a line and execution will 
begin there. This added flexibility is es- 
pecially convenient when working with 
loops and subroutines. 


Getting Started 

Since BASIC Labels is written entirely in 
machine language, you'll need to enter 
it using MLX, the machine language en- 
try program found elsewhere in this is- 
sue, When MLX prompts you, respond 
with the values given below. 


CEA4 
CFFB 


Follow the MLX instructions carefully. 
Before you exit MLX, be sure to save a 
copy of the program to disk with the 
name BASIC LABELS. 

Next, type in the BASIC program 
Demo. To ensure accurate typing, enter 
this program using The Automatic Proof- 
reader, also found elsewhere in this is- 
sue. When you've finished typing, be 
sure to save a copy of the program. 


Starting address: 
Ending address: 


Using the Program 

The program Demo shows you how to 
use BASIC Labels in your own pro- 
grams. To load the machine language, 
place a statement of the form 


10 IF A= 0 THEN A=1:LOAD“BASIC 
LABELS",8,1 


at the beginning of your program, Then 
type SYS 52900 to enable the routine. 

With BASIC Labels, each label must 
begin with a letter and can contain as 
many as 20 alphanumeric characters. A 
left square bracket ([) must precede 
each label at the point of execution. If 
you forget to include this character, a 
syntax error will occur. (BASIC tries to 
interpret the label itself as a command.) 
Also, be careful if you use a left square 
bracket within quotation marks, A 
string containing this character could be 
mistaken for a label if the subsequent 
characters match those for a label. 

A colon (:) is used to mark the end 
of each label. Don’t place a space be- 
tween the end of the label and the colon 
unless you want it to be part of the la- 
bel. When branching, refer to the label 
by its exact name; don’t include the 
bracket or the colon (for example, GO- 
SUB GETINPUT). 

One caveat: Although BASIC La- 
bels is fully functional with GOTO and 
GOSUB, with the ON GOTO/ON GO- 
SUB statements only the last branch 
line number can be replaced by a label 
(for example, ON x GOTO 10,20,30, 
LABEL), 


BASIC Labels 

CEA4:AD G6 63 8D C7 CE AD 61 28 
8D C8 CE A9 BB 8D GG 8C 
A9 CE 8D G1 03 60 EG AG 
FG GA EG OB DO G3 4c SC 





CEDC:PF FF FO 15 C9 3A FO ll 14 
CEE4:99 ED CF 8C EA CF C8 EE A4 
CEEC:DC CE D@ EB EE DD CE DO E2 
CEF4:E6 A9 5B AG G0 99 ED CF F7 
CEFC:A@ 64 A2 @6 AS 2B 85 A3 CB 
CFG4:A5 2C 85 A4 Bl A3 FO 1B 95 
CEG@C:DD ED CF FG G9 A2 G6 CB BA 
CF14:D0 F2 E6 A4 DO EE EC EA 07 
CP1C:CF FO 3E E8 C8 DO ES E6 72 
CF24:A4 D@ El C8 DO G2 E6 A4 14 
CE2C:Bl A3 FO 1F 20 49 CF 20 83 
CF34:49 CF Bl A3 8D E8 CF 20 AC 
CE3C:49 CF Bl A3 8D £9 CF 26 BB 
CF44:49 CF 4C 08 CF C8 DO 62 CB 
CEAC:E6 A4 60 CB DG G2 £6 AA 22 
CP54:Bl A3 D@ DB A2 11 4c C6 46 
CE5C:CE 26 49 CF Bl A3 C9 3A 7B 
CF64:D9 B9 98 18 65 A3 8D EB 36 
CF6C:CF A9 OG 65 A4 BD EC CF BI 
CF74:CE EA CF 18 AD EA CF 65 CF 
CP7C:7A 85 7A A9 GG 65 7B 85 B6 
CF84:7B 38 AD 97 CF 
CF8C:97 CF AD 98 CF E9 66 8D DE 


BASIC Labels 


CF94:98 CF AD FF FF C9 89 FO 55 
CP9C:06 C9 8D FG 1D DG E2 20 84 
CPA4:A9 CF 6C 08 63 AD EB CF 91 
CFAC:85 7A AD EC CF 85 7B AD 6B 
CFB4:E8 CF 85 39 AD £9 CF 85 3B 
CFBC:3A 66 68 68 26 A9 CF 6C DB 
CFC4:08 63 A@ 66 Bl 7A C9 5B A3 
CECC:FG G5 A9 BB 4C C6 CE CB EF 
CFD4:68 68 68 68 Bl 7A FO E7 97 
CFDC:C9 3A FO E3 B6 7A DO F4 04 
CPE4:E6 7B DG FO GG GG GO OO FF 
CFEC:08 68 09 68 G0 G8 BG BG BC 
CFF4:00 G8 88 66 GO BO BB BG 94 


SG 10 IFA=OTHENA=1:LOAD"BASIC 
{SPACE }LABELS",8,1 
S¥S52900 

PRINT" {CLR}"; TAB (3) "COPY 
RIGHT 1996 COMPUTE! PUB. 
+ INC." 
PRINTTAB(16) "ALL RIGHTS 
{ SPACE } RESERVED" : PRINT: P 
RINT 
PRINTTAB(3):PRINT"THE LI 
NE NUMBER OF EACH BRANCH 
Is" 
PRINTTAB (4) : PRINT"DISPLA 
YED AS IT EXECUTES BELOW 
{YEL}":PRINT: PRINT 
GOSUB LABEL:GOSUB LABEL1 
:GOSUB CCC 

GOSUB DDD:GOTO A LONG LA 
BEL 

THIS PART OF LINE WILL N 
OT BE USED: [LABEL:GOSUB 
{SPACE} DDD: PRINT"110":RE 
TURN 

MS 100 [LABEL1:PRINT"120":RETU 


MK 26 
DG 36 


EM 46 


HE 50 


PA 60 


GR 70 
SB 80 


DR 9G 





PQ 110 
XX 126 


PRINT"13 
(DDD: PRINT" 14 
TURN 

[A LONG LABEL:GOSUB156: 
PRINT"END" 

END 

PRINT: PRINTTAB (2) "{7}YO 
U CAN USE NORMAL BRANCH 
ES AS WELL" 
PRINTTAB(8)"(GOTO 20, F 
OR EXAMPLE) ":RETURN 





ETURN 
(EEE: RE 
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Randy Thompson 


“The Programmer's Page” is interested 
in your programming tips and tricks. 
Send all submissions to The Program- 
mer’s Page, COMPUTE!’s Gazette, 
P.O, Box 5406, Greensboro, North 
Carolina 27403. We'll pay $25-$50 
for each tip we publish. 


This issue’s hints and tips range from a 
technique to put you in 64 mode on the 
128 to one for creating colorful listings. 


Go Directly to 64 Mode 
Normally, to go into 64 mode on a 128, 
you type GO 64, hit RETURN, and then 
answer Y to the ARE YOU SURE? 
prompt. But if you type SYS 65357 in- 
stead, you go directly to 64 mode. The 
ARE YOU SURE? prompt does not ap- 
pear. You can use this SYS from within 
a program as well. 
Ali Imran 
Lahore, Pakistan 


Decimal to Hexadecimal Chart 
This program prints a hexadecimal 
lookup chart for the decimal numbers 
0-255. It prints the numbers in five 
neatly aligned columns, Such a chart is 
useful when you're programming in 
machine language or whenever you 
need to convert a number from hexa- 
decimal to decimal or vice versa. 
GP 100 REM DECIMAL TO HEX CONV 
ERSION CHART 
HIGH=255:REM UPPER LIMI 
T 
OPEN 4, 
{SPACE}$" 
PRINT#4,SPC (20) "DECIMAL 
0 HEX CONVERSION CHAR 
T":PRINT#4:PRINTOS 
D=X:GOSUB 200:REM CONVE 
RT TO HEX 
XS=RIGHTS (STRS (1000+X), 
3) sHXS=RIGHTS (HDS, 2) 
PRINT#4,TAB(5) 7" ";XS$;S 
PS;HXS; 
X=X+1:Y=¥+1:1F Y=6 THEN 
Ye1:PRINT #4 
IF X<=HIGH THEN 146 
PRINT#4:CLOSE 4:END 
HDS= D/4096:FOR I=1 


DH 118 


Ds 128 





=1:Y=1:SP$=" 


PF 136 





RE 140 
MX 150 
DQ 166 
JG 176 
PF 186 


Ps 196 
cA 200 





TO 4 tHDS=HDS+CHRS 
(48+D8~ (D8>9) *7) :D=16*( 
D-D%) 

PS 210 NEXT 

CD 220 RETURN 


If you want this program to print 
numbers higher than 255, change the 
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variable HIGH in line 110 to reflect the 
new upper limit, 

Henry E. Shotwell 

Berwick, PA 


REMarkable Codes 

It’s a little-known fact that you can use 
the REM statement to change the ap- 
pearance of your BASIC program list- 
ings. Both the 64 and the 128 will 
process control codes that follow a 
REM, forcing the computer to perform 
tasks such as changing the text color, 
clearing the screen, moving the cursor, 
and even emitting a beep (128 only). 

To enter these codes, you must 
type REM, enter two quotation marks, 
hit DEL once (to remove the second 
quotation mark), press CTRL-9 (for 
RVS/ON), and then press SHIFT-M. 
Your line should appear with a single 
quotation mark followed by a reversed 
backslash character. Now, you may fol- 
low this backslash with one or more of 
the characters shown in the accompa- 
nying table to create a variety of effects. 
All of these control characters must be 
entered in reverse mode, 

For example, enter a program line 
with a REM, type two quotation marks, 
DEL, CTRL-9, and SHIFT-M to prepare 
for the control codes; then enter two Q's 
(unshifted), press CTRL-0 to exit 
reverse mode, type 13 spaces and the 
word COMMODORE, press CTRL-9 to 
enter reverse mode again, and then en- 
ter one last Q. Now, when you list the 
line you'll see 


10 REM“ 
COMMODORE 
READY. 


The first quotation mark that you 
type is used to hold the characters; the 
second quotation mark turns off quote 
mode but is deleted so that the com- 
puter remains in quote mode when the 
line is listed. The CTRL-9 doesn’t print 
any characters but activates reverse 
mode. The reverse shifted M is equiva- 
lent to a shifted RETURN (ASCII 141). 
The reversed Q’s are cursor downs, If 
you've ever typed a cursor down in 
quote mode, you know that the com- 
puter prints a reversed Q. 

To print normal characters in your 
listing, simply exit reverse mode by 
pressing CTRL-0. Remember to turn 
reverse back on, however, to enter the 
codes listed in the following table. 


Hints and Tips 


Character-Code Function 

Keypress 

] cursor right 

SHIFT-— cursor left 

SHIFT-Q cursor up 

Q cursor down 

Ss home cursor 

SHIFT-S. clear screen 

iv delete 

SHIFT-T insert 

R reverse on 

SHIFT-R reverse off 

SHIFT-P black 

E white 

£ red 

CMD-* cyan 

CMD-— purple 

t green 

bo blue 

SHIFT-+ yellow 

SHIFT-A orange 

SHIFT-U brown 

SHIFT-V light red 

SHIFT-W dark gray 

SHIFT-X medium gray 

SHIFT-Y light green 

SHIFT-Z light blue 

SHIFT-+ light gray 

B underline on 
(80-column only) 

SHIFT-B underline off 
(80-column only) 

G ring bell (128 only) 

SHIFT-M shifted return 

N lowercase characters 

SHIFT-N uppercase characters 

oO flash on (80-column 
only) 

SHIFT-O flash off (80-column 
only) 

1 tab (128 only) 

x set/clear tab 
(128 only) 

{ escape 


Instead of using the characters giv- 
en above, you can also enter control 
codes as normal keypresses, To do this, 
you must enter a quotation mark direct- 
ly after the shifted M and press DEL to 
remove it. This puts you back into 
quote mode, where you can enter the 
control codes simply by pressing the 
appropriate key. For example, to enter a 
cursor-down character (which appears 
as a reverse Q), simply press the cursor- 
down key. Or to enter a color change, 
simply hold down CTRL and press one 
of the number keys. 

Abhay Saxena 
Glen Oaks, Me 














Now Get Inside Your Commodore with 
COMPUTE!’s Gazette Disk. 





Now there’s a way to get all the exciting, fun-filled programs of 


Bee Fm —_-COMPUTE!’s Gazette—already on disk—with COMPUTE!'s 
reo S Gazette Disk. 
> ' Subscribe today, and month after month you'll get a new, fully- 
9 00 8 tested 51-inch floppy disk guaranteed to run on your Commodore 
Oo}a}o}ofahG}o}c ee §—_6 4, or Commodore 128 personal computer. 


(ejojalojajelaya} 
ae COMPUTE!’s Gazette Disk brings you all the latest, most chal- 


lenging, most fascinating programs published in the corresponding 
issue of COMPUTE!’s Gazette. So instead of spending hours typing 

dre fesersa dst at rite in each program, now all you do is insert the disk...and your 
programs load in seconds. 


RESULT: You have hours more time to enjoy all those great 
programs which appear in COMPUTE!’s Gazette—programs like 
SpeedScript 128, Arcade Volleyball, 3-D Sprites, Sketch Pad, Sound 
Manager, 1541 Speed and Alignment Tester, and hundreds more. 


So don't waste another moment. Subscribe today to COMPUTE!’s 
Gazette Disk at this money-saving price. Take a full year’s 
subscription for just $69.95. You save 55% off the single issue 
price. Subscribe for two years and save even more! Return the 
enclosed card now. 


















































Individual issues of the Disk are available for $12.95 (plus 
$2.00 shipping and handling) by writing us at P.O. Box 5188 
Greenshoro, N.C. 27403. 














User Group 


Edited by Liz Casey 


The following list includes updated entries to our annual “Guide to Commo- 
dore User Groups,” which last appeared in the May and June 1989 issues, 
Send typed additions, corrections, and deletions for this list to 


Commodore 64/128 User, Group Update 
COMPUTE!'s Gazette 

P.O. Box 5406 

Greensboro, NC 27403 


When writing to a user group for information, please remember to enclose 
a self-addressed envelope with postage that is appropriate for the country to 
which you're writing. 
Note: COMPUTE! Publications does not condone the use of its user group lists by 
individuals or user groups for the purpose of buying, selling, or trading pirated soft- 
ware, Should we discover any group participating in any such illegal and unethical 
activity, the club's listing will be permanently deleted from our files. 


The Blue Juniata Commodore Users-Group has changed its mailing address. 
The correct mailing address is 23 Oakland Avenue, Lewistown, Pennsylvania 
17044, 


The correct bulletin board service telephone number for Commodore Users 
Group of Kansas City (P.O. Box 36034, Kansas City, Missouri 64111) is (816) 
353-9961. 


The Queens Commodore Users Group (QCUG) has moved. Its new mailing 
address is P.O, Box 129, Ozone Park, New York 11417, The group has also 
added a bulletin board service; the number is (718) 366-7445. 


The Tulsa Area Commodore Users Group (TACUG) has changed its mailing, 
address. All correspondence should be sent to P.O. Box 52473, Tulsa, Oklahoma 
74152-0473. Its new bulletin board service number is (918) 428-2284, 


The Scranton Commodore Users Group in Scranton, Pennsylvania has 
changed its bulletin board service number, The correct telephone number is 
now (717) 969-1228, 


The Muenster Garrison User’s Group has updated its mailing address. The 
new address is c/o Mr. Maki, 583rd Ord Co., APO New York, NY 09078. 


(oo) Koy YN ble) 


New Listings 
Colorado Plus Four Forum, 1340 Fillmore St, 
ARIZONA Denver, CO 80206 


Prescott Area Commodore Club (P.A.C.C),?.0.  JSROCGTEN 
Box S013 /TirescatteAZib6o0 Metro Atlanta Commodore Klub (MACK), P.O. 





CALIFORNIA 


Commodore 64 West User Group, 2306 W. 180 
St., Torrance, CA 90504 

Temple City Commodore Users Group 
(TCCUG), 9317 E. Olive St., Temple City, CA 
91780 

Commodore Computer Club, 55 Beverly Dr., 
Camarillo, CA 93010 
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Box 813481, Smyrna, GA 30081 (BBS# 404-590- 
7114) 


IOWA 


Commodore Computer User's Group of Iowa 
(CCUGD, P.O, Box 3140, Des Moines, 1A 50316 


LOUISIANA 


West Bank Users Group, P.O. Box 740854, New 
Orleans, LA 70174-0854 


M HUSE Ss 
ies 


Commodore User Group of the Ber! 159 
Doreen St., Pittsfield, MA 01201 


NEW JERSEY 
Fair Lawn Computer Club, c/o Herman Sachs, 6 
Bryson Rd., Fair Lawn, NJ 07410 


RTH CAROLI 


0 

Western Carolina Commodore Beginner User 
Group (WCCBUG), Rt. 4 Box 387, Forest City, 
NC 28043 (BBSw 704-287-8052) 

Greater Onslow Commodore Users Group (GO- 
CUG), P.O. Box 1644, Jacksonville, NC 28541 


fo) s ite) 


Western Cincinnati Commodore Club (WEST- 
COM 64), P.O. Box 89, Amelia, OH 45102 


TENNESSEE 


Chattanooga Commodore Users, 1406 Blackwell 
Dr., Chattanooga, TN 37412 


TEXAS 


The Software Palace, 11200 Socarro Rd., El Paso, 
‘TX 79927 (BBS# 915-859-8714) 


Renton Computer Group, 11308 SE 269th St,, 
Kent, WA 98031 

Yakima Area Commodore Club, P.O, Box 10937, 
Yakima, WA 98909-1937, 


WISCONSIN 


Exealiber 64/Amiga, Rt. 3 Box 30-AA, Cumber~ 
land, WI 54829 


Outside the U.S. 


AUSTRALIA 


C64 Computer User, P.O. Box 826, Young, New 
South Wales 2594, Australia 
CANADA 

Calgary Commodore Users Group, 37 11810 
Macleod Tr. SE, Calgary, Alb,, Canada T2) 2V8 

Commodore User's Group of Saskatchewan 
(CU,GS), 1752 Forget St., Regina, Sask., Canada 
ST 4Y5 

Ottawa Commodore Microcomputer User Group 
(CMUG), c/o Mr. Z, Colynuck, 2 Kingsmill St,, 
Nepean, Ont,, Canada K2E 5)1 


COSTA RICA 
Club Commodore Tico, P.O. Box 4356-1000, San 
José, Costa Rica 


MEXICO 


Club de Usuarios Commodore de Chihuahua 
(CUCC), R. Calderon #801, Chihuahua, Chihua- 
hua, Mexico 31240 


PAKISTAN 


Commodore User Group (C.U.G), 465-C, Satellite 
Town, Gujranwala, Pakistan 

















Do you have a question or a problem? 
Have you discovered something that 
could help other Commodore users? 
We want to hear from you. Write to 
Gazette Feedback, COMPUTE!'s Ga- 
zette, P.O. Box 5406, Greensboro, 
North Carolina 27403. We regret that, 
due to the volume of mail received, we 
cannot respond individually to pro- 
gramming questions. 


Video Digitizers 
I'm interested in a video digitizer for my 
Commodore 64, I know of two such 
products: ComputerEyes and Video 
Byte. Could you tell me a little more 
about each of these? 
Art Green 
Pembroke Pines, FL 


Video digitizers take output from a VCR 
or a video camera and convert it into a 
high-resolution bitmapped image. Com- 
puterEyes is an established product and 
costs $129.95, It takes about six seconds to 
produce a gray-scale image in Doodle or 
Koala format. 

Video Byte II is newer and features 
faster scanning and color support. Files 
are saved in Koala format. Color printing 
is supported with the Super Explode! ver- 
sion 5 cartridge. The digitizer costs 
$79.95, and the Super Explode! 5 cartridge 
is $44.95. For more information on Com- 
puterEyes, contact Digital Vision, 66 
Eastern Avenue, Dedham, Massachusetts 
02026; (617) 329-5400. If you'd like to 
know more about Video Byte II and Super 
Explode! 5, contact The Soft Group, P.O. 
Box 111, Montgomery, Illinois 60538; 
(312) 851-6667. 


A BIT Confusing 

Recently, I was converting a VIC-20 
machine language program to work on 
a C64 and ran across the following 
subroutine. 


8000 LDA #$05 
8002 BYTE $2C 
8003 LDA #$§01 
8005 STA  $033C 
8008 RTS 


After SYSing to it, | PEEKed location 
828 to see what value was stored there. 
In every instance, location 828 holds 5, 
the first value loaded into the accumu- 
lator. Why is this? Shouldn’t the second 
value, 1, be the number stored in 828? It 
appears that the code for BYTE $2C 








(decimal 44) has something to do with 
what's happening here, but I can’t fig- 
ure out why. Can you help? 
Matt Bathke 
El Cajon, CA 


We can see why you're confused. It seems 
that location $033C should contain a 1 
each time you call the subroutine, but it 
doesn’t. The problem is that the subrou- 
tine can be disassembled in two ways. The 
disassembly above is one way to look at 
the subroutine; below is another, 


8000 LDA #$05 
8002 BIT $01A9 
8005 STA $033C 
8008 RTS 


Now, you can see why location $033C 
contains 5 when the subroutine ends. The 
BIT command at location $8002 ANDs the 
contents of the accumulator with the con- 
tents of location $01A9 and sets the status 
register accordingly. It also copies bit 7 of 
$01A9 to the N (negative) flag of the status 
register and bit 6 to the V (overflow) flag. 
Unlike the AND command, the BIT com- 
mand doesn't change the contents of 
$01A9 or the accumulator. 

The BIT command was originally in- 
tended to be used to read 1/O registers 
without losing the contents of either the 
register or the accumulator. Another pop- 
ular use of the BIT command is to allow 
multiple entry points into a subroutine. In 
the subroutine above, if you enter at 
$8000, location $033C contains a 5 when 
the subroutine exits. If you enter at $8003, 
location $033C contains a 1. If you're in- 
terested in learning more about the BIT 
command, watch for the July and August 
installments of “Machine Language Pro- 
gramming,” where Jim Butterfield ex- 
plains how the BIT command works and 
some of its more common uses. 


A Matter of Timing 

Owners of older 64s (mine was manu- 
factured and sold in 1982) should be 
aware that the original version had de- 
sign errors in both the hardware (TOD) 
and software (jiffy) clocks. 

A TOD e-of-day) clock is im- 
plemented within each 6526 chip. Al- 
though BASIC on the 64 doesn’t use 
this function, some third-party soft- 
ware does, including Berkeley's GEOS. 
The fault is in the circuit that generates 
the 60 PPS (power-line frequency) 
pulses for the 6526s, causing them to 
count at two to three times the correct 






rate. In my 64, this condition persisted 
for about half an hour after the power 
was turned on, depending on what was 
plugged into the expansion port. The 
fault can be cured by soldering a 0.1 jifd 
ceramic capacitor across R37 (6.8K), lo- 
cated to the right of U27 on the mother- 
board, and another 0.1 ufd ceramic 
capacitor across CR1 (1N4371), located 
near the center of the board. 

BASIC on the 64 generates the jiffy 
clock (TI$) by counting IRQ pulses, 
which originate in Timer A of 6526 #1 
at a nominal rate of 60 PPS. This 
counter counts at the system (CPU) 
clock rate of 1.023 MHz. In the original 
software, the Timer A divisor is 16667 
decimal, which is correct for a 1,000- 
MHz clock. Hence, the jiffy clock runs 
2.3 percent fast, gaining an extra min- 
ute every 45 minutes, or 33 extra min- 
utes per day. 

This error can be corrected by writ- 
ing the proper divisor (17045 decimal) 
into the Timer A latches before setting 
TIS. To do this, include one of the fol- 
lowing patches in your program's ini- 
tialization routine. 


(in machine language) 


LDA #$95 
STA $DC04 
LDA #$42 
STA $DCO05 


(in BASIC) 
POKE 56324,149:POKE 56325,66 


The timer latches are write-only; 
you cannot read the values in them. In 
later 64s, these patches have no effect 
on the computer since they simply re- 
write the same (correct) values already 
in the latches, 

Alex Engel 
La Canada, CA 


Thanks for this enlightening discussion on 
the 64's clocks. Soldering on a circuit 
board is a delicate operation and therefore 
we suggest that only qualified readers at- 
tempt to make the hardware modifica- 
tions. You can determine whether you 
need to use the software modification with 
your computer by PEEKing location 
65408. The oldest 64s have a 170 in this 
location. If you have one of the oldest 64s, 
you should use the software patch sug- 
gested above in any program that uses the 
64s clocks, As Mr. Engel suggests, you can 
safely use the patch on all 64s, G 
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Larry Cotton 


This month we'll cover three more lesser- 
known commands—including one I 
haven't used in over seven years of 
BASIC programming, They are the logi- 
cal functions AND, OR, and NOT, The 
two most useful in this group are AND 
and OR, so we'll look at them first, 

Type the following line and press 
RETURN: 


PRINT 1 AND 1 


Itseems that 1 AND 1 is not the same as 
1 plus 1, But why not? AND and OR are 
inextricably associated with the concept 
of bits and bytes, so let’s take the 
time—never before undertaken in this 
column—to grasp this. 

‘As most of you probably know by 
now, most older computers are 8-bit 
machines (the 64 and 128 fall into this 
category), Every character on the key- 
board and each BASIC keyword is rep- 
resented by eight bits, or one byte, A bit 
is the smallest piece of information a 
computer can recognize. It can be either 
on or off, true or false, yes or no, or plus 
or minus. But most often, it’s 1 or 0. 
Thus, the letter A is represented 


0 1 0 0 0 0 0 1 


This string of binary digits forms 
the binary number 01000001, which 
equals the decimal number 65. It’s also a 
byte (or word) of eight bits. Think of 
each of the digits above, which can be 
only 0 or 1, as falling in a particular col- 
umn, headed by a number. 

To determine the binary number's 
decimal equivalent, just add all the 
column-head values where a 1 is show- 
ing in that column: 


128 66,82 056) 8: 6) 2: 1 
OF TL OP AO wb) [One “ies 


Each bit falls into a particular posi- 
tion in the row and has a value twice 
that of the bit just to the right of it. The 
1 under both the 64 and the 1 mean that 
these two bits are on, while all the bits 
having a value of 0 are off. If all the bits 
were on, the sum would be 255, the 
highest number that any one byte can 
represent, 

Recall that 255 is the largest num- 
ber that can be POKEd to a memory 
location. Now we know why. When 
POKEing a number, say, the decimal 
number 57, to a particular memory lo- 
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cation, we are turning on the bits 32, 16, 
8, and 1: 


128 64 32 16 8 4 2 1 
[Peal jaoens § ya CC ae Td 


Here are some other decimal num- 
bers and their binary equivalents: 


128 64 32 146 8 4 2 #1 

OR Orn Or orien 0 = 88) 
O 0. (O%\.0) Reem ti Oi 16 
1 0 0 0 “Ob 205.0. 0=— 126. 


Try a few yourself, What are the bi- 
nary equivalents of 26? of 45? of 12? 
What are the decimal equivalents of 
00010000? of 11011001? of 00111100? 


Decimal to Binary Conversion 

Here's a short program, which we'll an- 
alyze line by line, that converts decimal 
numbers to binary, Conveniently, it 
also uses AND, OR, and SGN (covered 
in last month's column). 


10 INPUT“{CLR} {DOWN) DECIMAL 
NUMBER";D 

20 IF D<0 OR D>255 THEN RUN 

30 PRINT”{DOWN)"D“= "; 

40 FOR I=7 TO 0 STEP —1 

50 X=D AND 2t1 

60 Q=SGN(X) 

70 PRINT“ {LEFT}"Q; 

80 NEXT 

90 PRINT:END 


Line 10 gets the decimal number 
from the user, Line 20 uses OR to weed 
out any numbers less than 0 or greater 
than 255. (See “OR,” below, for more 
on this.) Line 30 prints the decimal 
number and an equal sign. Here’s 
where ANDing is used; line 40 begins a 
FOR-NEXT loop that ANDs the input 
decimal value with eight values, one at 
a time, Those values are 128, 64, 32, 16, 
8,4, 2,and 1, which should look familiar. 

Those values are calculated by se- 
quentially taking 2 to the powers 7 
through 0. Two to the seventh power (2 
times itself seven times) is 128, 2 to the 
sixth power is 64, and so on. Two to the 
power 0 is 1 (any number to the power 
Ois 1). 

Each bit of a byte is numbered right 
to left from 0 to 7: 


7 6 5 4 3 2 at 0 


Thus, 2 raised to the power of each 
of these numbers yields our bit values: 
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128 64 32 16 8 


Best of all, by San ‘ee 
the input decimal number with the 
above numbers from left to right, you 
can see which of the bits is 1, or on. 

Let’s say you want to convert deci- 
mal 35 to a binary number. Line 40 first 
assigns | a value of 7. In line 50, 35 is 
ANDed with 2 to the seventh power 
(128). Here's how to manually AND 35 
and 128: 


128 64 32 16 8 4 2 1 
Of PROMO! | OM Aaidianss, 
DOD SOE ORS Or 0 OL Onze 
07-0 0 G0 0 0 0 O=0 


The first row contains our bit val- 
ues, The second and third rows are the 
problem rows, which contain the binary 
equivalents of the two numbers that we 
are ANDing, The fourth row contains 
the answer to the binary ANDing, In or- 
der fora 1 to pop up in the answer row, a 
column must contain a 1 in both problem 
rows. Since none of the columns do, our 
answer to 35 AND 128 is 0. 

Of course, one can use PRINT to 
AND two numbers: 


PRINT 35 AND 128 


If you enter this and press RE- 
TURN, you'll see 0 as the result. Before 
we continue with the program, let's 
AND 35 and 32: 


128 64 32 16 8 4 2 1 

One LOND VOR LOY 0.50) Lames: 
ORE OMS Ae ONO ON 10t82) 
OO ITO! POO OF S032 


Now both problem rows contain a 
1 under 32, causing a 1 to pop up in the 
answer row, Thus, 35 AND 32 is 32. 


Back to the Program 

Line 60 uses SGN to evaluate the sign 
of X, the result of ANDing. Recall from 
last month that SGN(0) yields 0 and 
SGN of any positive number yields 1. 
Therefore, if X is a positive number (it 
really doesn’t matter what its value is), 
Q will be 1; if X is 0, Q will be 0, 

All that’s left to do is to print, in 
line 70, a string of Q’s to form the binary 
number, Be sure to enter the semicolon 
at the end of line 70. The left cursor just 
squeezes the numbers a bit closer 
together. 

Line 80 completes the FOR-NEXT 


loop. Control goes back to line 40, I be- 
comes 6, D is ANDed with 64 (2 to the 
sixth power), and so on, Line 90 moves 
the cursor down a line and ends the 
program. 

Any number of values can be 
ANDed at once. Let's do one more 
AND exercise by ANDing 6, 11, and 47: 





5 jot ‘indy as CS SO ER a | 

Cas CIS eS Sa 
OD} 10 AON AYO Gr2'9) Orde » Dede 
Tyee PS able Cael (eames Ve a MARY 
CL a a ae Fy 


Only under the 2's column do all 
the problem rows contain a 1. Thus, 6 
AND 11 AND 47 equals 2. Confirm this 
by typing PRINT 6 AND 11 AND 47 
and pressing RETURN. 


OR 

OR works in a similar way, but only 
one problem row has to contain a1 in 
each column in order for a 1 to appear 
in the answer row. Here’s how 8 OR 2 
looks: 


128 64 32 16 68 4 2 1 

OPO O gov s4 oy Wy {d= s: 
CE Or 20S 0.er 0. as 2 262) 
0 0 0 0 1 0 1 O10 


When we OR two numbers, if 
either of the bits in a column is 1 (turned 
on), the answer bit must be 1. A 1 pops 
up in the 8 and 2 columns. We then add 
8 and 2 in the normal way, getting 10. 
Thus, 8 OR 2 is 10. Very strange, but 
very true, 


Using AND and OR 

How can we put all this to work for us 
in BASIC programming? Actually, we 
only occasionally need to AND or OR 
numbers together. More often, we use 
AND and OR with IF-THEN state- 
ments such as we've already seen. If 
you haven't entered the entire program 
above, at least enter these two lines and 
RUN them: 


10 INPUT“{CLR} {DOWN} DECIMAL 
NUMBER’;D 
20 IF D<0 OR D>255 THEN RUN 


What do these lines do? Type a few 
values at the prompt, such as 0, 35, 900, 
and R. You'll soon see that a statement 
like the one in line 20 can weed out ex- 
traneous numbers and letters you don’t 
want the user to enter. In this case, the 
user can enter any number in the range 
0-255, inclusive, but nothing else. 

Here's a way to use AND: 


10 PRINT”DO YOU WANT TO 
CONTINUE (¥/N)?” 

20 GET AS:IF AS<>"Y" AND AS<>"N” 
THEN 20 

30 IF AS=“N” THEN END 

40 (program continues here) 





Recall that <> means “not equal 
to.” Using these or similar lines will en- 
sure that the only time the program 
progresses beyond this point is when 
the user presses Y or N at the question. 

AND and OR are also used to turn 
one or more bits on or off within a par- 
ticular memory register, especially if 
you don’t know which bits are already 
on. For instance, memory register 
53265 on the Commodore 64 normally 
contains the number 27. To switch the 
computer into its high-resolution 
mode, you must turn on bit 5 in this 
register. To do this, you'd enter 


POKE 53265,PEEK(53265) OR 32 


To turn bit 5 off and thus return to 
text mode, you'd enter 


POKE 53265,PEEK(53265) AND 223 


If you're interested in learning 
more, the Commodore 64 Programmer's 
Reference Guide contains a number of 
examples that use AND and OR to 
modify the bit values in a byte. 


NOT Much Value 
The last logical function we'll mention 
is NOT. The Commodore 64 Program- 
mer’s Reference Guide states, “The NOT 
logical operator ‘complements’ the val- 
ue of each bit in its single operand, pro- 
ducing an integer ‘twos-complement’ 
result.” Not very clear! Actually, NOT 
makes true statements false and false 
statements true. For example, IF NOT 
(A = 5) THEN GOTO 912 means if it’s 
not true that A = 5, then go to line 912. 

Occasionally, you'll see NOT oper- 
ating on a numeric variable, usually 
within a POKE statement. When used 
this way, NOT takes a number, reverses 
the sign, and then subtracts 1. If you 
enter PRINT NOT 7, you'll see —8. 

I've written many BASIC programs 
and have yet to use NOT, I did run 
across some examples years ago, but 
I’ve lost them. If any of you would like 
to share your experiences with NOT, in 
a clear fashion, 1 would be happy to 
share them with others in a future 
column. 

Incidentally, you can AND, OR, 
and NOT numbers from —32768 to 
32767. G 
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Richard A. Rardin 


Note important dates and times with 
this desk accessory for GEOS and 
GEOS 128, versions 1.3 and higher. 


If you're like most computer users, time 
just slips away while your fingers dance 
upon the keys. You often get caught up 
in what you're doing and forget about 
meetings, birthdays, and other impor- 
tant dates, Wouldn’t it be nice if your 
computer would remind you? 

Calendar lets you record important 
dates and times and then displays them 
so that you can look them up quickly 
and easily. In addition, Calendar is a 
desk accessory, so it doesn’t matter 
whether you're working on the desk- 
Top, creating a work of art in geoPaint 
or formatting a newsletter with geoPub- 
lish; Calendar is always available. 


Typing It In 

Calendar is written in machine lan- 
guage, so you'll need to use MLX, the 
machine language entry program found 
elsewhere in this issue, to type it in. The 
MLX prompts, and the values you 
should type in, are as follows: 


0247 
OFBE 


When you've entered the data for Cal- 
endar, save two copies to a GEOS work 
disk, Save the first with the filename 
CALENDAR and the second with the 
name CALENDAR.BKUP. One copy 
will be converted by GeoConverter 2.0 
into a GEOS desk accessory. The other 
is a backup copy in case you have a 
problem with the conversion. 

Now type in GeoConverter 2.0. 
(This is the latest version of GeoCon- 
verter, presented here for the first time.) 
Be sure to use The Automatic Proofreader, 
also found elsewhere in this issue, to 
prevent typing mistakes when you en- 
ter the program. Save a copy of GeoCon- 
verter 2.0 to the disk that contains 
Calendar. Be very careful when typing 
in GeoConverter 2.0. It writes directly to 
your disk, and a typing error could 
cause it to scramble the disk. 

To prepare Calendar for use with 
GEOS, load GeoConverter 2.0 and type 
RUN. When prompted for a filename, 
enter CALENDAR. GeoConverter 2.0 
then converts the file into a GEOS desk 
accessory. 
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Starting addre: 
Ending address: 


Using the Program 

To use Calendar, either double-click on 
its icon or select calendar from the geos 
menu. The program displays a calendar 
of the current month in the center of 
your screen. From left to right along the 
top of the calendar window are a file 
menu, two arrow icons, the name of the 
current month, two more arrow icons, 
and the current year, 

To change the month, click on one 
of the arrow icons to the left of the 
month name. The left-arrow icon dis- 
plays the previous month; the right 
arrow displays the following month. 

Change the year by clicking on one 
of the arrow icons just to the left of the 
current year. The left arrow changes the 
display to the same month in the previ- 
ous year. The right arrow causes the 
same month in the following year to be 
shown. 

Using the two sets of arrow icons, 
you can have Calendar display months 
in the distant past or in the future. 
There is no limit as to how far you can 
go either way. 

To enter notes for any day of the 
month that’s currently displayed, click 
in the box corresponding to that day. A 
dialog box opens on top of the calendar, 
and any notes that you've previously 
entered are shown. For each day, 
there’s room for 7 one-line notes. To 
the left of each note, Calendar displays 
two icons, E and D, Click on the E icon 
to edit the corresponding note or to cre- 
ate a note if none exists. Enter up to 34 
characters for each note, and press RE- 
TURN when you've finished. While 
you're editing a note, you may not close 
the dialog box or click on another icon. 
Clicking on the D icon deletes the cor- 
responding note. Clicking on the close 
icon in the upper right corner of the dia- 
log box saves the notes and returns you 
to the calendar. Dates which have notes 
will now be highlighted. 

Calendar is designed to handle 
notes for as many as 75 days at a time. 
Therefore, you may need to delete old 
notes as they become obsolete. To sim- 
plify this process, use the purge option 
from the file menu. Purge removes all 
notes for days prior to the current sys- 
tem date. Be sure that the system date is 
set correctly before using this command. 

When you're ready to leave Calen- 
dar, click on the file menu and select 
quit. The program saves your notes to 





Calendar 


disk in the file REMINDERS. Each time 
you run Calendar, it looks for this file. If 
it finds it, the program loads the notes, 
Otherwise, it assumes no notes exist 
and begins with an empty calendar. De- 
leting the REMINDERS file is a quick 
way to delete all the notes in the calen- 
dar. If you remove all of the notes with- 
in Calendar, the program automatically 
deletes the REMINDERS file. 


Calendar 
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@2DF:6E 6F 74 65 73 5D 3A OG 61 
@2E7:G0 AS 16 8D 93 28 28 D3 22 
O2EF:0F 





O4GF:6F 
0417208 
O41F:72 
6427:05 
O42F:05 
8437:05 
O43F:05 
O447:FE 
O44F: BE 
O457:F7 






0467:B7 
O46F:20 
0477368 
O47F:02 
6487:08 


9497:D0 
O49F:05 
O4A7:14 
O4AF:E9 
O4B7:E9 
O4BF:82 
8407306 
O4CF:AE 
0407: 8C 
O4DF:AD 
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095F:48 81 A9 B2 BD 47 81 AS 38 
9967:03 8D 4A 81 AS G2 8D 49 59 
Q96F:81 A9 87 8D 45 81 AI OO ED 





0997:A2 G0 20 43 GC FO 13 20 9D 
G99F:13 @C FO 11 18 AD 28 65 BA 





GA27:02 AG 1C 20 65 C2 18 AD FO 
GA2F:24 65 1C 85 1C 90 62 E6 98 
GA37:1D 26 G9 GC A2 GO 60 A2 3C 
GA3F:01 66 26 A7 GA EG 00 FO 2F 
OA47:01 






GA57:B3 
GASF:14 AD 83 14 8D 86 14 AD F6 
GA67:82 14 8D 85 14 AD 80 14 38 
GAGP:8D 84 14 AD 7F 14 8D 83 B3 
GA77:14 







GAB7:EO 
GA8F:66 20 D2 OB BB 50 EE 18 BE 
GA97:A9 28 65 1C 85 1C 9G G2 BB 
GASF:E6 1D BB 50 EG AD 87 14 6B 
GAA7:8D 84 14 AD 86 14 8D 83 24 
GAAF:14 AD 85 14 8D 82 14 26 E9 
GAB7:D2 68 6G A5 1D 85 G3 AS 48 
GABF:1C 85 62 18 A9 28 65 G2 BE 
GAC7:85 G2 96 82 E6 G3 AS 1D EC 
GACE:85 G5 AS 1C 85 G4 AD 20 OE 
@AD7:85 67 AI 93 85 06 AS 06 74 
GADF:38 E5 62 85 G6 A5 67 ES DC 
GAE7:03 85 07 20 7E Cl CE B2 OD 
GAEF:14 60 A9 6G AG G3 91 1C AB 
GAF7:88 10 FB 60 AG Q@ Bl 1c SE 
GAFF:CD 83 14 DO 19 CB Bl 1c Dé 
@BG7:CD 84 14 D@ 11 C8 Bl 1C DF 
@BOF:CD 82 14 DO 49 CB 20 36 1E 
@B17:0C 31 1C CD 81 14 60 AD AA 
@B1F:81 14 29 EG FO 03 AD FF 15 
0B27:60 AI 1F 60 AG G2 Bl lc 4E 
@B2F:66 AD 05 85 10 G1 60 AS C4 
@B37:3B 85 83 AS 3A 85 02 AS 98 
@B3F:62 38 E9 28 85 G2 AS G3 AG 
OB47:E9 





OB57:A0 

OB5E:07 16 27 AS 3C 85 64 AD ES 
0B67:00 85 05 38 AS 04 ED 8D AD 
OB6F:14 85 04 C6 G4 30 68 AD 39 
0B77:08 85 67 AD 16 85 66 A2 DF 
OB7F:04 AG G6 26 69 Cl AS B4 24 
GB87:C9 G5 16 53 AS G2 BD 89 D4 
OB8F:14 E6 G2 AI G7 85 G6 A2 41 
0B97:04 AG G6 20 6G Cl 18 AS 7A 
GB9F:04 65 G2 85 G2 AS 82 BD EL 
@BA7:8E 14 38 AS G2 ED 88 14 58 
OBAF:85 02 E6 G2 AS G2 8D Bl D7 
@BB7:14 36 24 F@ 22 AD 8C 14 6C 





ID G6 43 83 GA B4 GD 46 32 
GBFF:0D G6 4F G3 GA B4 GD 46 BB 
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The Geos Column 


0C87:0D 
@COF:aD 
@C17:0D 
OclF:0D 
9C27:0D 
Oc2P:FF 
0C37:19 
OC3F:91 
0047286 
OC4F:06 
0C57:01 
OCSF:E1 
OC67:EF 
OC6F:DG 
6077214 
OC7E:01 
6C87:61 
OCBF:10 
Oc97314 
OCOF:FO 
@CA7:8D 
OCAF: 36 
9CB7:3B 





OCEF:EO 
OD07:A9 
ODOF: 20 
0D17:65 
@O1F:85 
0D27:0E 
OD2F:06 
0D37:02 
OD3F:8D 
0047:62 
OD4F:0E 
6D57:05 
GDSF:85 
0D67:85 
OD6F:85 
OD772A9 
OD7F:85 
OD87:E0 
OpaF:A5 
@D97:A9 
OD9F:85 
@DA7:Cl 
GDAF:A9 
ODB7:20 
ODBE: 62 
@DC7:42 
OpcF:39 
@bD7:05 
@ppF:18 
ODE7:66 
ODEF:19 
ODE7:45 
ODFF: 00 
GE07:06 
GEOR: 66 
GE17:85 
GE1F:G2 
GE27248 
OE2F:20 
GE37:85 
OE3F:81 
OB47:85 
GE4F:2C 


GESF:14 
GE67:A9 
OEGF:B1 
@E77:84 
GE7E:B8 
GEB7:A9 
OEBF:A9 
OE9T:A9 
GEOF:A9 
GEA7:A9 


20 COMPUTE!’s Gazette 


96 
06 
06 
06 
1B 
FF 
ar 
99 


oA 
GA 
GA 
OA 
oB 
16 
99 
99 
EF 
FE 
El 










GEAF:A9 
GEB7:20 
GEBF:A9 
GEC7:C1 
GECF:90 
GED7:0E 
GEDF:E7 
GEE7:20 
GEEF:88 
GEF7:08 
GEFF:20 
6F07:18 
OFOF:GC 
OF17:A9 
OFLF:E6 
GF27:0E 
Or2F:10 
OF37:8A 
OF3F:C8 
OF47:85 
OF4P:85 
OF57:20 
GFSF:AD 
OF67:18 
GF6F:G2 
OF77:93 
OF7F:A9 
OF87:A9 
OP8F:20 
GP97:18 
GOFOF: 62 
GPA7:04 
GFAF:84 
OFB7:D0 


BEFORE TYPING . 


Before typing in programs, 


please refer to “How to Type In 


COMPUTE!'s Gazette Programs,” 


elsewhere in this issue. 





GeoConverter 2.0 
HQ 10 REM COPYRIGHT 1990 ComPU 


SE 


QK 


sx 


RP 


KR 


MK 


QE 


SB 


RS 


BX 


2 


30 


46 


5a 


60 


76 


86 


98 


TE! PUBLICATIONS, INC. - 
ALL RIGHTS RESERVED 

IF (PEEK (772) +PEEK (773) *2 
56) =42364THENSG 

COLORG, 1:COLOR4, 1:COLOR6 
+ 1?SA=PEEK (4625) *256+PEE 
K (4624) :GOTO56 
POKE56, PEEK (46) +40:CLR:P 
OKE53280,0:POKE53281,0:S 
A=PEEK (56) *256+PEEK (55) 
PRINT" {CLR} {8}{N} {DOWN}" 
TAB (12) "{RVS}GEOCONVERTE 
R 2.G{OFF}{GRN}{3 DOWN}" 
: PRINTTAB (13) "COPYRIGHT 
{SPACE} 1996 (DOWN}" 
PRINTTAB (7) "COMPUTE! PUB 
LICATIONS INC. {DOWN} "?PR 
INTTAB(11)"ALL RIGHTS RE 
SERVED{2 DOWN)" 
N=8:PRINT"DRIVE NUMBER " 
N"(4 LEPT}"; 2 INPUTN: IFN< 
8ORN>11THEN7G 
KS="N":PRINT"IS DRIVE"N" 
A 1581? "KS"{3 LEFT}";:1 
NPUTKS: IFKS<>"N"ANDKS<>" 
Y"THENGG 
T$=CHRS (18) :SS=CHRS(1) :1 
PKS="Y"THENTS=CHRS (40) :S 
$=CHRS (3) 





100 INPUT"FILE TO CONVERT"; 


pitas OPEN15,N,15:OPEN1,N 
7"O:"4+NMS+",P,R" 





11g gosusiaes IFEN<>GTHENPRI 


NT"{RVS}"ENS" "EMSETSEE 
$:GOTO408 


FF 


BR 


EF 


GP 


GF 


RX 


MB 
GR 
HB 
DQ 
cs 
PA 


JJ 


EH 


126 


138 


148 


158 


168 
176 
186 


19 


206 


216 


226 


230 


248 
25 


268 
278 


286 
290 


300 
16 


328 
338 
346 


350 


36) 


376 


388 
396 
400 
410 
426 
436 


448 


450 


GET#1,K$, VS: IFK$<>CHRS ( 
71) ORVS<>CHRS (2) THENCLO 
SE1:CLOSE15:GOT0220 
PRINT" {DOWN} DECOMPRESSI 
NG...":Z$=CHRS (6) :GET#1 
rESC$:ESC=ASC (ESC$+Z$) : 
AD=SA 
GOSUB170:1FV<>ESCTHENPO 
KEAD, V:AD=AD+1:GOTO146 
GOSUB170:CT=V:GOSUB170: 
CT=CT+V*256:GOSUB170:GO 
SUB16G:GOTO146 
FORI=1TOCT: POKEAD , V:AD= 
AD+1:NEXTI:CT=6: RETURN 
GET#1,V$:S=ST:V=ASC (VS+ 
Z§) : IEST=GTHENRETURN 
IFS<>64THENGOSUB440: PRI 
NT"{DOWN}LOAD ERROR - 
{RVS}"ENS™ "EMGETSEES:G 
oT0490 
IECT<>GTHENGOSUB160:AD= 
AD-1 

PRINT" {DOWN} WRITING 
:CLOSE1:PRINT#15,"5\ 
NMS$:CLOSE15 
OPEN1,N,8,"G:"+NMS+",P, 
W"sFORI=SATOAD: PRINT#1, 
CHRS (PEEK (I)) ; :NEXTI:CL 
OSE1 

PRINT" {DOWN} CONVERTING. 
+. "2HDS="":PORI=1T04:RE 
ADHE :HDS$*HD$+CHRS (HE) :N 
EXTI 
FORI=1T05:READIE:IDS$=1D 
S+CHRS (IE) :NEXTI 
NLS="":0PEN15,N,15,"1G2 
":OPEN2,N,2, 
GOSUB416:GET #2,NTS,NSS 
:FORE=0T07:DS=NLS:GET#2 
,BS:I=1:1FBS=NLSTHEN316 
IF ASC(BS)<>136 THEN3106 
GET#2,HT$,HS$:1=3:1FHSS 
=""THENHS $=CHRS (0) 
GET#2,B$:1=I+13 1FBS: 
HENBS§=CHRS (0) 

IF (ASC (BS) =160)OR(I=19) 
THEN3106 
D$=D$+B$:GOTO280 
FORI=IT031:GET#2,B$:NEX 
TI: IFDS=NMSTHEN346 
NEXTE: IENTS=NLSTHEN340, 
TS=NTS:S$=NS$:GOTO25G 
IFDS=NLSTHENPRINT" 
{DOWN}DISK ERROR!":GOTO 

















wp 





DTS=T$:SS$=S$:TS=HTS$:S$ 








=HS$:GOSUB410:GET#2,MTS 
/MS$: LEMSS$="""THENMSS$=CH 
RS (6) 


FORI=0T065:GET#2,B$:NEX 





TS$=DT$:S$=SS$:GOSUB410: 
FORI=1T032*E+2:GET#2,BS 
:NEXTI: PRINT#2,CTS;MTS; 


MSS; 
FORI=0T015:GET#2,B$:NEX 
TI:PRINT#2,HTS;HS$;CHRS 
(8) ;GTS; IDS; :GOSUB420 
PRINTNMS" CONVERTED!" 
CLOSE1:CLOSE2:CLOSE15:E 











ND 
US="01":GOT0430 
us="U2" 
PRINT#15,U$; 
"Q") FASC (SS+"G 
INPUT#15,EN,EMS,ET ,EE?E 
NS=STRS (EN) :ETS=STRS (ET 
) 3EES=STR$ (EE) : RETURN 
DATA 0,255,3,21,87,10,1 
19,8 8 
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Il computers have one thing in common: They hate 

bad power. Bad power is a term used to describe 

electric power that has the capability of damaging 

your computer severely (expensively) or causing 

your computer to lose some or all of your data. 
Most of us never really think about the quality of the power we 
use every day—but we should. Bad power can cause expensive 
damage to our computers and any other electronic devices in our 
home—VCRs, televisions, stereos, almost anything that uses 
digital electronics. > 
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SAFEGUARD 
YOUR 
SYSTEM! 


Sags, Surges, 

and Spikes 

How does power get bad? We can't 
blame the power company; the quali- 
ty of what it produces is excellent, It’s 
what happens to the power after it 
travels for miles and miles that causes 
a degradation in quality. In simple 
terms, every device that uses electrical 
power injects its own amount of inter- 
ference back into the power line, 
Some devices contribute negligible 
amounts that dissipate quickly, while 
others, like air conditioners, can cause 
the power-line voltage to drop (a sag) 
or increase (a spike or surge) for a 
short time. There are other power-line 
problems, too, but these are the most 
common. 

A sag occurs when the line volt- 
age drops from its normal value for a 
very short time, ranging from thou- 
sandths of a second to a few seconds. 
It's generally caused by heavy loads 
connected to the power line. The 
startup of a large electric motor is a 
good example of what causes a sag. 
When a sag occurs, the effect on your 
computer is the same as turning it off 
and on. In other words, everything 
not saved is history. 

A surge happens when the power 
rises, sometimes up to 20 percent 
higher than normal, and, like a sag, 
lasts from thousandths of a second to 
a few seconds, A surge is usually 
caused by heavy loads (again, electric 
motors) being disconnected from the 
power line, The effect on your com- 
puter? It usually locks up or the surge 
causes damage to the computer's in- 
ternal components. 

A spike is a particularly nasty 
beast, It is a very short but very high 
increase in line voltage, sometimes as 
high as 600-1000 volts, that usually 
lasts for a few millionths of a second, 
It can cause computers to lock up, 
disk drives to clobber files, and micro- 
chips to be physically damaged, 
sometimes dramatically. 

A spike can be caused by a vari- 
ety of things, but the usual culprit is 
an electric motor. Spikes of 200 volts 
or less are the most common and re- 
quire expensive supression devices, 
Spikes can be detected only by line- 
disturbance analyzers, which are quite 
expensive, They cost from $600 to 
$12,000—and you can’t get them at 
Radio Shack. The electric company 
can’t help to protect your equip- 
ment—its commitment, obviously, is 
not to producing computer-grade 
power. What it controls is the amount 
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of power supplied and its frequency 
(60 Hz). 


Causes and Solutions 
Electric motors are the main cause of 
powerline problems. If you want to 
see how much garbage (technical term 
for “junk” or “stuff”) an electric mo- 
tor will generate, turn on your televi- 
sion and then run a hair dryer on the 
same circuit. All that “snow” (gar- 
bage) that you see on the screen is be- 
ing created by the tiny motor in the 
dryer. Not only is this garbage being 
injected into your household power, 
but it is also being picked up by the 
antenna, You may wonder, with this 
kind of everyday interference, why 
your lights aren’t constantly blinking 
on and off. Let's look at power from a 
computer's point of view, 

Power-line problems usually oc- 
cur in thousandths of a second (milli- 
seconds) or millionths of a second 
(microseconds). And this is the same 
rate our computers execute program 
instructions. A computer relies on an 
internal clock, which is a steady 
stream of electrical signals that keeps 
everything in step. In the Commodore 
64, these signals occur every one- 
millionth (1/1,000,000) of a second, If 
even one of those pulses is missing, 
or if a false one is generated due to a 
power-line disturbance, the computer 
will come to a screeching halt. Incan- 
descent light bulbs are incapable of 
turning on and off that fast. Fluores- 
cent lights can, but we couldn’t see 
such an effect anyway. 

What can you do to protect your 
computer system? A good way to re- 
duce the amount of garbage fed from 
your wall socket to your computer is 
to have a separate, or dedicated, line 
run from your breaker box to your 
computer. (Don’t attempt to install 


one yourself unless you're a qualified 
electrician.) There are also a number 
of devices called surge supressors, 
which are commonly found in many 
retail stores. For about $5, they offer a 
minimal amount of protection against 
surges and no real protection against 
spikes of 500 volts or less. Most spike 
protectors in stores don’t start su- 
pressing until spikes are above 500 
volts. The specifications of each de- 
vice are usually on the product label 
in very small print, Read the labels 
carefully. There are some effective 
spike/surge suppressors in the $35- 
$75 range that do an acceptable job 
for the average user, These can be or- 
dered through companies that deal in 
power-conditioning devices. Let your 
fingers do the walking. 

The only protection against sags 
is a full-line conditioner or battery 
backup, but this product is beyond 
most of our financial capabilities, 


Thunderstorms 

The best way to protect your equip- 
ment during a thunderstorm is to shut 
it off and wait out the storm. For the 
ultimate in protection, unplug the 
computer, as well as any other appli- 
ances you value, It's amazing how 
many people will work through a se- 
vere thunderstorm, thinking that the 
worst that can happen is a blackout, 
They forget that lightning has a talent 
for disturbing power lines for miles 
around when it hits hard. 

The moments just before the 
lights go out are the most dangerous. 
Why? The electric company automati- 
cally tries to compensate for line- 
voltage fluctuations whenever they 
occur, During a storm, then, the line 
voltage can rise and fall faster than a 
department store elevator at Christ- 
mas, not to mention the spikes and 
other goodies that are created, This 
kind of activity beats the daylights out 
of your equipment, So remember, if 
you hear thunder, shut off your 
equipment, 

There aren’t any easy solutions to 
the power problem, but using good 
common sense will make the differ- 
ence between getting work done on 
your computer and waiting for your 
number to be called at the repair 
shop. 





Charles Kuhlmann is a customer engineer 
for Wang Laboratories in St. Louis, Mis- 
souri, with eight years’ experience in di- 
agnosing and correcting computer power 
problems. 





/MJOJN]T/G/O/MJE|R|Y | GJRJAIN|T) 






AMIGA 500 


‘Amiga 600wi512K —BuiltIng* 
Disk Drive = Mouse. FREE 


“GD 


AMIGA 500 
RGB COLOR PACKAGE 


‘Amiga 500 w512K Bull-in 3.5* Disk 
Drive. Mouse RGB Color Montor| 
Free Software 


ip 


AMIGA 500 With 1084.,....°789 
AMIGA 500 With 1084 
81010 3,5" DrlVO nnn? 949 


AMIGA 
AMIGA 2000 
Nee ee cerat wagons 


pubs 5 Dk Dove Mouse 


AMIGA 2000 





INCLUDES: 


COMMODORE C 64-C 


STARTER PACKAGE 
C/64-C with Excelerator Plus 
Disk Drive Two Games Softwares 


GEOS Program 
Quantum Link Software & Membership 


FREE Gift Offer 


Quantum Link Software & ‘Membership 








RGB COLOR PACKAGE 
ited 
‘ROB Godt Wonton 1084 Monitor 
‘ree Mouse & Software $979% ae 
SEAGATE |_ ae 
20, 30, 40, 60, 80, 100MB 1802 Monitor 
ARMGAz000w'1084 sa 549 HARD DRIVES IN STOCK $ 1 g9% 
AoA 7300 WSEAGATE #1759 
ae MIG: 
matic HD. AMIGA’ PERIPHERALS 
AMIGA 1010 Disk Drive..4149 A-501 Memory 
‘A-1680 Mode! 199.95 ReEoSe #149 
20,30, 40, 60, \ U 
AMIGA 2500 Hard Drives tor Monltor.... 


AMIGA 2500/30 (25éz) 


commodore 


FREE GAME ($1895 VALUE) | .126D with Built-In 
(QUANTUM LINK SOFTWARE 
MEMBERSHIP 


1571 Disk Drive 


CALL 


1581 Disk Drive 





Disk Drive 


Cc 128= 





COMMODORE 128D 


COMPLETE PACKAGE 
Commodore C/128-D Computer with 
Built-in Disk Drive 

Commodore Color Printer 

12° Monitor 


COMMODORE 128D 


DELUXE PACKAGE 
Commodore C/128-D Computer with 
Built-in Disk Drive 

Commodore 1802 RGB Color Monitor 
Commodore Color Printer 











COMMODORE C 64-C (asi 98Valn} 
oa E EAA E siege 
Commadoro 1541-¢ pe Drive ee 
Sommodore Color Eras ogram _| Plus FSD-2 Disk 
Quantum Link Software Hy fembership ene 

(219.95 Valve) 

$129% 

1750 RAM 
leat C64-C Expansion 
COLOR P, GE 
Commodore C-64/C Computer CALL 
Commodore 1541-C Disk Drive SS 
Commodore Color Printer ——a) 
Color Monitor GEOS Pr 











XETEC 40MB Hard Drive for; 

C-64/128 &1260.. 

WE CAN RECONFIGURE ANY OF OUR 
‘COMPUTER PACKAGES TO YOUR 

























INSTOCK 
$499 


AMIGA 50/2000... 
A-2088D Bridge Card... 








4.22060 
ATBridge Board....$1079 yang’ 





AMIGA A-2058 RAM 
Expansion... 


ALL, 
PER 








OTHER 
ERIPHERALS & 
DRIVES IN STOCK 








Cill 


















SPECIFICATIONS. 
CALL FOR INFORMATION. 
EQUITY Il+ 
IBM AT COMPATIBLE 


Keyboard 40K RAM 20288 
Microp 12M8 Fi 


COMMODORE 
colt i 


Ss 






COMMODORE COLT Com; 
Ease ooroa te 








tard Diba coe monroe $ B59 
ery 

}084 MONITOR nS 879 
__ COMMODORE 
z 


IBM AT COMPATIBLE "exzey ate 
IMBRAM <OMaHard On | 2G Feppy 
Yege uphicnCad MS00833 








na: 
KXP-1180.$164  KXP-31: 
Beatdisn Beate: 


a 
commodore 






3) oMpATioLe 
PACKAGE 





‘SAME WITH SEAGATE 20MB HARI 
SAME WITH SEAGATE 30MB HARD DRIVE..$1729 
SAME WITH SEAGATE 40MB HARD DRIVE..$1289 


B... at 


WISEA 
Satoh MOMBPACKAGES...- 








Neil Harvey 





aarean 


OK. You've played 
the original Bounty 
Hunter (August 
1987), and now 
you're a whiz at 
U.S. geography. 
You're so good, in 
fact, that govern- 
ments from all over 
the world are seek- 
ing your assistance 
to bring to justice 
the most dangerous 
criminals alive. But 
before you go international, you'd bet- 
ter brush up on your world geography. 

International Bounty Hunter is 
played on a scrolling world map. You 


From Niger to Rwanda, 
























must move from 
country to country, 
using visual clues 
to determine the lo- 
cation of the crimi- 
nal. Once you've 
caught him, you 
have a limited time 
to bring him back 
to the country that 
hired you. Along 
the way, you must 
the chase continues, identify every 

country or capital 
you pass through, If you fail to return 
the criminal in the alloted time, he 
escapes and you have to start the chase 
all over again. 





Use your knowledge of world geography 


to round up the bad guys in this exciting educational 


game for the 128. Joystick required. 


26 COMPUTE!'s Gazette March 1990 





Typing It In 

International Bounty Hunter consists of 
three programs. The main program, 
IBH, is written entirely in BASIC. Type 
it in using The Automatic Proofreader, 
found elsewhere in this issue. When 
you've finished, be sure to save a copy 
of the program to disk. 

The second program, IBH Map 
Base, is a machine language file that 
contains the compressed color data for 
the maps. Type it in using 128 MLX, the 
machine language entry program also 
found elsewhere in this issue. The 128 
MLX prompts, and the values you 
should enter, are as follows: 


C350 
D487 


When you've finished typing, save this 
file to disk using the filename IBH MAP 
BASE. 

The last program, IBH Map Ex- 
pand, is a short BASIC program that de- 
compresses IBH Map Base. Type it in 
using The Automatic Proofreader. When 
you've finished, be sure to save the pro- 
gram to disk, 

Before you can play, you must de- 
compress the file I]BH MAP BASE. To 
do this, load and run IBH Map Expand. 
This program uncrunches IBH MAP 
BASE and saves the resulting file to 
disk as IBH MAP DATA. 

When you're ready to play, plug a 
joystick into port 2. Then load and run 
IBH. After the program has loaded the 
map data, you'll be prompted for the 
type of game you wish to play. You 
have two choices. Game 1 requires you 
to identify the countries that you wish 
to travel to, and Game 2 requires you to 
identify their capitals, 

After selecting the game type, 
you'll be prompted for the difficulty 
level (1-6). Level 1 is the easiest, while 
level 6 is the hardest. The difficulty lev- 
el determines how often the criminal 
moves from place to place, as well as 
how much time you have to return a 
captured criminal to your employer. 


World Navigating 

When the game begins, you're auto- 
matically placed in the country that has 
hired you. Be sure to remember this 
country because it’s where you must re- 
turn the captured criminal. The white 
square beside your character represents 
the capital of the country that you're in. 
If you're in an extremely small country, 
the square is placed on a corner of the 
country. 

The top screen line displays your 
current location, such as Washington, 
D.C., U.S.A, At the upper right, you'll 
find the bounty for the criminal that 
you're chasing. On the second screen 
line, you're prompted for a move. 

You can move to any country adja- 
cent to the one you're occupying or to 
one that is connected by a sea route. To 


Starting address: 
Ending address: 


move, type in the name of the country 
(in Game 1) or its capital’ (in Game 2) 
and press RETURN. If your response is 
invalid, the prompt will reappear. Other- 
wise, your character will be placed in 
the country you've selected. 

As you move to different countries, 
the map display will scroll along with 
your character. Thus, your movement is 
not restricted to the area you see at the 
start of a game. 


The Manhunt 

Being an international bounty hunter is 
no easy task. You have to know where 
you are, where you're going, and where 
you've been, as well as be able to track 
down the bad guys. However, you're 
given a couple of tools to make your job 
easier. 

The first tool at your disposal is a 
bad-guy detector, which appears as an 
asterisk in one corner of the screen. The 
placement of this asterisk tells you the 
general direction in which you must 
travel to reach the criminal. If you trav- 
el toward the asterisk, you'll eventually 
encounter the criminal. As you near 
him, you'll see him on the current 
screen, To capture him, you must occu- 
py the country that he’s in. Once you've 
captured the criminal, the asterisk will 
appear in the small white box beside 
your character. 

In addition to your bad-guy detec- 
tor, you're equipped with a panoramic 
viewfinder. This little device comes in 
handy if you need to get your bearings 
or to plot a shorter route to your desti- 
nation. To use it, press Fl. The word 
LOOK is displayed at the center of the 
screen. In LOOK mode, you can scroll 
the display around with the joystick. 
Neither your character nor the criminal 
will appear on the map while in this 
mode, so you can’t use this as a shortcut 
for finding the criminal. When you've 
finished using the viewfinder, press the 
fire button to resume the game. 

The moment you capture the fugi- 
tive, a timer is displayed to the left of 
the bounty. This timer counts from 0 to 
the limit determined by the skill level. If 
you make it back to your employer 
within the time limit, your job is com- 
plete and you’re awarded the bounty, If 
you don’t make it, the criminal escapes 
toa randomly selected country and you 
must start all over again. You'll soon 
learn that it pays to make haste. 


Helpful Hints 

If you find yourself stuck in a country 
and don’t know the way out, don’t pan- 
ic. Just type HELP at the prompt or press 
the HELP key and you'll be given the 
name of a place to move to. This option 
randomly selects a country adjacent to 
the one you occupy. Consequently, you 
may have to use it several times before 
the name you're looking for appears. 
You can use the help option as often as 


you like, but keep in mind that in the 
meantime the criminal may flee. 

The various skill levels that are of- 
fered allow you to fine-tune the game 
according to your ability. At level 1, you 
have six minutes to return the captured 
criminal to your employer. At level 2, 
you have five minutes; at level 3, four 
minutes; and so on, 

The skill level that you choose also 
determines how quickly the criminal 
moves from place to place. On level 1, 
he moves very slowly, At level 6, he can 
move as often as you do. When playing 
at the higher levels, you must take dif- 
ferent measures to capture the criminal, 
For example, on level 6 you can’t catch 
the criminal by moving to the country 
he’s in, because he'll move before you 
get there. You must move to a country 
adjacent to the one he’s in and hope 
that’s where he goes, It’s also a good 
idea to position yourself so that the 
criminal has a limited number of escape 
routes, 

Names of countries are sometimes 
spelled differently depending upon the 
reference source. If you enter a coun- 
try’s name and it’s refused, just tap the 
HELP key until you find the spelling 
used in the game. If you wish to perma- 
nently alter the spelling of a country or 
its capital, change the DATA state- 
ments at the end of IBH. You can also 
do this to update the program when 
countries change their names or their 
capitals. 

Also note that, in some instances, 
certain “countries” are actually territo- 
ries or provinces of other countries. For 
example, Greenland is under the do- 
main of Denmark, the Falkland Islands 
are part of the United Kingdom, and so 
on, For game purposes, these are treat- 
ed as independent countries. 


XQ. 5 REM COPYRIGHT 1990 COMPUT 
E! PUBLICATIONS, INC. - A 
LL RIGHTS RESERVED 
SC 6 PRINT"({CLR}COPYRIGHT 1990 
"SPRINT"COMPUTE! PUBLICAT 
IONS, INC.":PRINT"ALL RIG 
HTS RESERVED" 
DS 10 BANK15:GRAPHIC1,1:GRAPHI 
C@:BLOAD"IBH MAP DATA",B 
G,P8192:PAST:A=RND(~TI) 
BE 20 POKE53281,0:POKE53280,0: 
FORA=4869T05284:READAS: P 
OKEA, DEC (A$) :NEXTA 
RB 30 FORA=3584T03711:READAS:P 
OKEA, DEC (AS) :NEXTA?KEYL, 
"LOOK" +CHRS (13) : POKE250, 
6 

40 POKE251,32:DIMCNS (149,1) 
1X (149) ,¥ (149) ,AC (149) ,G 
(149,14) :FORA=170149 

EE S@ READCNS(A,G) ,CNS(A,1) ,X( 
A), ¥(A) ,AC (A): FORB=1TOAC 
(A) :READGC (A,B) :NEXTB,A 

800600":TS(2)="00 

2T$(3)="000400":TS ( 
4) ="000300":1$ (5) ="00020 
o" 
PJ 76 T$(6)="G0G100":AS=" 
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x! 


5 
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{39 





PACES }"+CHR$ (13) 
{HOME} "+AS+AS+AS+" 
{HOME} {5}":TBS=" {HOME} 
{OFF}{5}{6 SPACES}RRRRRR 
RRRRRRRRRRRRRRRRRRRRR"+C 
HRS (13) 
TBS=TBS+" *****INTERNATI 
ONAL BOUNTY HUNTER#****** 
"+CHRS (13) 

TBS=TBS+"{6 SPACES} 

{27 ¥}{6 SPACES}" 
FORA=1T08 : MOVSPRA, G80:M 
OVSPRA,@,@:SPRITEA, @:NE 
XTA 

PRINT" {CLR} {WHT} 

{6 SPACES} RRRRRRRRRRRRR 
RRRRRRRRRRRRRR™ 

PRINT" *****{PUR}IN 
{RED} TET1PRN{YELJAT{6}1 
O{GRN}NA{BLU}L {WHT}BOU 
NTY HUNTER**#*##*" 
PRINT"{6 SPACES}{27 Y}" 
: PRINTTAB (12) "{8} 

{3 DOWN}CHOOSE A GAME 
{DowN}" 
PRINTTAB(11)" 


KD 8a 





FQ 90 


FE 100 


RB 110 


PF 120 


XR 136 


Js 14 


CP 15; 


2 


{Rvs} 





" (RVS}{CYN} 2 {OFF} 
{8}CAPITALS":SLOW:DO:GE 
TKEYAS 
LOOPUNTILAS="1"0RAS="2" 
3GT=VAL (AS) ~1: PRINTTAB ( 
12)"{3 DOWN}CHOOSE A LE 
VEL{DOWN}" 
PRINTTAB(11)" {RVS} 
{CYN} 1 {OFF} {8}EASY T 
O{DOWN}":PRINTTAB (11)" 
{SPACE}{RVS}{CYN} 6 
{OFF} {8}DIFFICULT” 
GETKEYAS: IFAS<"1"0RAS>" 
6" THEN18@:ELSEPAST :TMS= 
TS(VAL(AS)) 
MR=13-2*VAL (AS) : PRINT" 
{CLR}":FORA=1144T02023: 
POKEA, 160:NEXTA:SYS4959 
2S¥S4989 
POKE25G,6:POKE251,32:PR 
INTTBS:SPRCOLOR2, 11:X=0 
:¥=0:MOVSPR1,164,145 
BC=INT (149*RND(1))+1:SC 
SINT (149*RND(1))+1:1FBC 
=SCTHEN210 
BN=10000:CS=0:CC=S 
SC:SPRITE1,1,1 
INEZ Ly Live 
B4G6 
IFINT (MR*RND (1) ) =@ANDCS 
=GTHENBC=GC (BC, INT (AC(B 
C) *RND (1)) +1) :BN=BN-196 
IFCC=BCANDCS=OTHENSPRIT 
E2,0:CS=1:POKE1604,170: 
TIS="990000" 
IFCS=1ANDT1I$>TMSTHENCS= 
@:BC=INT(149*RND(1)) +1: 
POKE1604,160 
IECS=1ANDCC=SCTHEN5S60 
GOSUB5G0 : PRINTSPSCNS (CC 
rl)", "CNS (CC,8) 
IFCS=1THENPRINTTAB (24) " 
{DOWN} "MIDS (TI Pe ete! 
RIGHTS (TI$,2)"(3 UP}" 
PRINT" {DOWN} "TAB (31) ;:P 
RINTUSING"S##,##8";BN:P 
RINT"(2 UP}GO TO: {@> 
{LEFT }";:BS="" 
FAS=CHRS (28) ANDB 
THENBS=LEETS (BS, LE 

N(BS)-1) :PRINT" 

{2 LEFT}{@}(LEFT}";:GOT 

0308 
310 IFAS=CHRS (13) THEN340 
320 IFASC (AS) <320RASC (AS) >9 


Qm 160 


7 


=) 


QK 


DA 186 


SB 196 


PE 206 


JE 210 


c= 
tre liSPR 
LOW: GOSU 


GM 2208 








MS 230 


QK 240 
BE 250 


HD 
GK 


268 
270 


FS 280 





MR 290 





RX 
GH 


28 COMPUTE!'s Gazette March 1990 


KP 


sc 


AR 


QQ 


MQ 


Qs 


ss 


EX 


ce 


QF 
RC 


gp 


ac 


EQ 


EA 


EJ 
HE 


AJ 


Q 330 


346 


358 
368 
376 


386 
390 


OTHEN30G 
IFAS<>CHRS (34) THENPRINT 
AS"{@}{LEFT}"; :BS=BS+A$ 
:GOTO300 

PRINT" ":IFBS="HELP"THE 
N46@:ELSEIFBS="LOOK"THE 
N48 
B=@:FORA=1T0149:IECNS (A 
GT) =BSTHENB=AzA=149 
NEXTA: IFB=QTHEN230 
(C=8:FORA=1TOAC (CC) : IFB= 
GC (CC, A) THENC=1:A=AC (CC 
) 

NEXTA: IFC=GTHEN236 
CC=B:NC=CC:GOSUB400:GOT 








* 0236 


46 


Ss 


41a 
420 
436 


440 


456 
466 
478 


480 


490 


506 


510 


521 


536 


546 


558 


566 


576 


58e 


598 


6aa 


618 


628 


63a 
640 


650 





SPRITE2,0:PRINTTBS:MOVS 
PR1,164,145:A=X(NC) IFA 
> 68THENA=68 

DR=G: IPX<ATHENDR=1 
TEY<Y¥ (NC) THENDR=DR+128 
SYS5G51,DR,ABS (X-A) ,ABS 
(¥-¥ (NC) ) 2X=A: Y=¥ (NC) 
IFX (NC) >68THENMOVSPR1,1 
64+8* (X(NC)-68) ,145 
RETURN 

PRINTSPS$"YOU COULD GO T 
on 
PRINTCNS (GC (CC, INT (AC (C 
C)*RND(1)) +1) ,GT) :FORTG 
=6T01600:NEXT:GOTO230 
SPRITE1,@:SPRITE2, 6: POK 
£1562,140:POKE1563,143: 
POKE1564,143:POKE1565,1 
39 
S¥S5156,X,¥:FORA=1562TO 
1565: POKEA, 160:NEXT:SPR 
ITE1,1:SPRITE2,1:GOTO23 
6 








SPRITE2, @:POKE1144,166: 
POKE1183,166:POKE1984,1 
68: POKE2623,160 
POKE1164,16@:POKE2004,1 
60:POKE1584,160:POKE162 
3,160: IFCS=1THENRETURN 
TEX (CC) <X (BC) THENA=1183 
:ELSEIEX (CC) >X (BC) THENA 
=1144:ELSEA=1164 

IPY (CC) <¥ (BC) THENA=A+84 
@:ELSEIFY (CC) =¥ (BC) THEN 
=A+440 
POKEA, 176: IFABS (X-X (BC 
)>100RABS (¥-¥ (BC) ) >11TH 
ENRETURN 
MOVSPR2,164+16* (X (BC) -X 
) ,145+8* (¥ (BC) -Y) :SPRIT 
£2,1:RETURN 
PRINTSPS"YOU HAVE EARNE 
D A BOUNTY OF ";:PRINTU 
SING"S##,###";BN 
PRINT"FOR BRINGING THIS 
CRIMINAL TO JUSTICE.” 
PRINT" PRESS {RVS} RETU 
RN {OFF}":DO:GETKEYAS:L 
OOPUNTILAS=CHRS (13) 
PRINTSPS"SINCERE THANKS 
FROM THE GOVERNMENT OF 
“:PRINTCNS (SC,@)"." 
PRINT" PRESS {RVS} RETU 
RN {OFF}":D0:GETKEYAS:L 
OOPUNTILAS=CHRS (13) 
PRINTSPS"{DOWN}PLAY AGA 
IN?{2 SPACES}PRESS 
{RvS} y¥ {OFF} oR (RvS} 
{SPACE}N {OFF}":DO:GETK 
EYAS 
IPAS="N"THENPOKE53286,1 
3:POKE53281,11:SPRITE1, 
G: PRINT" {CLR}{6}":END 
GoTO116 

DATA A9,@0,8D,61,13,A0, 
60,51 

DATA FA, 29,F0,6A,6A,6A, 











JG 
QP 
BE 
MA 
MH 
JB 
cc 
DH 
JG 
KH 
MP 
HK 
XR 
BJ 
cB 
QP 
xc 
FB 
ED 
cP 
cE 
EB 
SM 
AA 
xQ 
ec 
JE 
xs 
sp 
FC 
oH 
EM 
MG 
DE 
Dx 
Je 
AD 
sp 
cB 
AJ 
xc 


660 
678 
686 
698 
708 
718 


728 


6A,8D 

DATA 63,13,B1,FA,29,0F, 
8D, 04 

DATA 13,C8,CG,14,D5,13, 
18,A5 

DATA FA,69,58,85,FA,A9, 
00,65 

DATA FB,85,FB,18,A0,00, 
EE,@1 

DATA 13,8C,62,13,A9,00, 
AD,@3 

DATA 13,91,FC,CB,AD,G4, 
13,91 

DATA FC,E6,FC,E6,FC,A5, 
FC,C9 

DATA 99,D0,02,E6,FD,AD, 
91,13 

DATA C9,16,F0,06,AC, 02, 
13,4 

DATA @C,13,A9,78,85,FC, 
A9,D8 

DATA 85,FD,66,00,20,08, 
06,00 

DATA GG,38,A5,FA,E9,58, 
85,FA 

DATA A5S,FB,E9,00,85,FB, 
60,1 

DATA A5,FA,69,58,85,FA, 
A5,FB 

DATA 69,00,85,FB,60,C6, 
PA,AS 

DATA FA,C9,FF,DG,02,C6, 
FB, 66 

DATA E6,FA,A5,FA,C9,00, 
DG, G2 

DATA E6,FB,60,A5,FA,8D, 
68,13 

DATA A5,FB,8D,69,13,26, 
5F,13 

DATA 20,05,13,AD,68,13, 
85,FA 

DATA AD,69,13,85,FB,60, 
8D, 6D 

DATA 13,29,01,8D,6C,13, 
AD, 6D 

DATA 13,29,86,8D,6D,13, 
8E,6A 

DATA 13,8C,6B,13,AD,6A, 
13,C9 

DATA 00,D6,08,AD,6B,13, 


c9,08 
DATA DO,01,60,AD,6A,13, 
c9,00 
DATA D@,@D,AD,6B,13,C9, 
90,D0 
DATA 1C,26,AG,13,4C,D1, 
3,CE 
DATA 6A,13,AD,6C,13,C9, 
01,06 
DATA 06,26,95,13,4C,E7, 
13,26 
DATA 8A,13,4C,B7,13,CE, 
6B,13 
DATA AD,6D,13,C9,86,D8, 
06,20 
DATA 7C,13,4C,EE,13,20, 
6E,13 
DATA 4C,EE,13,00,00,06, 
89,8D 
DATA 22,14,8E,23,14,A5 
+PA,8D 
DATA 20,14,A5,FB,8D, 21 
114,AD 
DATA @0,DC,C9,7E,D0,13 
AD, 23 
DATA 14,09,00,F0,F2,20 
18E,13 
DATA 20,AG,13,CE,23,14 
AC, 34 
DATA 14,C9,7D,D8,13,AD 
123,14 
DATA C9,47,F0,DB,20,7C 
713,20 


MD 


RR 


1076 
10808 
1096 
11060 
1116 
1120 
1130 
1140 
1150 
1160 
1170 
1186 
1196 
1260 
1210 
1226 
1230 
1240 
1258 
1268 
1270 
1280 
1296 
1300 
1310 
13268 
1330 
1340 


1350 
1360 


1370 


1380 


1398 
1400 
1416 
1420 
1430 
1446 
1450 
1460 


DATA AQ,13,EE,23,14,4C 
134,14 

DATA C9,7B,DG,13,AD,22 
14,9 

DATA 00,F6,C4,20,8A,13 
120,00 

DATA 13,CE,22,14,4C,34 
114,09 

DATA 77,D0,13,AD,22,14 
109,44 

DATA FG,AD,20,95,13,20 
AG, 13 

DATA EE,22,14,4C,34,14 
109, 6F 

DATA DG,9D,AD,20,14,85 
+PA,AD 

DATA 21,14,85,FB,20,A0 
113,68 

DATA 00,00,09,00,A8,00 
102 ,AA 

DATA 00,0A,AA,00,2F,FA 
,80,8F 

DATA FA,00,07,7A,80,07 
17E,00 

DATA 3E,FE,00,FF,F8,00 
PE ,EO 

DATA 00,0E,B0,00,0F,FO 
00,0 

DATA F8,55,0B,E8,55,29 
168,41 

DATA A9,A8,41,AA,A8,41 
190,00 

DATA 41,06,00,55,00,00 
155,00 

DATA G6,00,00,00,00,00 
100,00 

DATA 00,00,A8,00,23,EA 
180,08 

DATA BA,86,07,7A,00,FF 
PA, 80 

DATA FF,FA,00,GA,FE,G0 
05 ,BB 

DATA 00,0D,F0,00,2F,E0 
100 ,AE 

DATA E8,55,AB,A8,55,AB 
AB, 41 

DATA AA,A8,41,00,00,41 
100,08 

DATA 41,60,00,55,00,00 
755,08 

DATA AFGHANISTAN, KABUL 
150 ,17,3,62,98,139 
DATA ALBANIA, TIRANE , 37 
114,2,48,146 

DATA ALGERIA, ALGIERS, 3 
3,15,7,77,82,83,86,93, 
132,144 

DATA ANGOLA, LUANDA, 36, 
44,4,15,88,147,148 
DATA ARGENTINA, BUENOS 
{SPACE}AIRES,17,61,6,1 
4,16,26,43,161,136 
DATA AUSTRALIA, CANBERR 
A,74,61,4,61,91,100,14 
6 


DATA AUSTRIA, VIENNA, 35 
+9,6,33,58,66,125,143, 
146 

DATA BAHAMAS, NASSAU, 11 
723,2,31,138 

DATA BANGLADESH , DHAKA, 
57,25,2,19,68 

DATA BELGIUM, BRUSSELS, 
33,8,4,45,90,135,143 
DATA BELIZE,BELMOPAN, 8 
427,2,58,84 

DATA BENIN,PORTO NOVO, 
33,35,4,18,93,94,131 
DATA BHUTAN, THIMPHU,57 
721,2,27,68 

DATA BOLIVIA,LA PAZ,15 
751,5,5,16,26,101,102 
DATA BOTSWANA, GABORONE 


1476 


1480 
1490 


1500 
1510 
1520 


1538 


1548 
1556 


1560 


1570 


1580 


1590 


1600 
1619 
1620 
1636 
16468 


1650 
1660 


1676 


1686 


1696 
1700 
1710 


1726 


1738 


1740 
1750 


1766 


1778 
1788 
1798 
18008 


139,54,4,88,116,148,14 
9 


DATA BRAZIL,BRASILIA,2 
@,49,11,5,14,28,53,54, 
76,101,162,122,136,141 
DATA BULGARIA, SOFIA, 38 
712,4,48,108,133,146 
DATA BURKINA PASO ,OUAG 
ADOUGOU, 31,31,6,12,47, 
67,82,93,131 

DATA BURMA, RANGOON, 59, 
29,5,9,27,60,73,129 
DATA BURUNDI ,BUJUMBURA 
,40,41,3,169,128,147 
DATA CAMBODIA, PHNOM PE 
NH,61,32,3,73,129,142 
DATA CAMEROON, YAOUNDE, 
35,35,6,24,25,29,41,46 


194 

DATA CANADA, OTTAWA, 14, 
9,2,49,138 

DATA CENTRAL AFRICAN R 
EPUBLIC, BANGUI ,37,35,5 
722,25,29,121,147 
DATA CHAD,NDJAMENA, 37, 
30,6,22,24,77,93,94,12 
1 


DATA CHILE,SANTIAGO,14 
761,3,5,14,102 

DATA CHINA,BEIJING,62, 
13,12,13,19,57,60,73,8 
5,89,95,98,127,139,142 
DATA COLOMBIA, BOGOTA, 1 
2,35,5,16,38,99,162,14 
1 


DATA CONGO, BRAZZAVILLE 
136,40,4,22,24,46,147 
DATA COSTA RICA,SAN JO 
SE,9,33,2,92,99 

DATA CUBA, HAVANA, 10,25 
14,8,55,68,138 

DATA CYPRUS, NICOSIA, 40 
117,1,74 

DATA CZECHOSLOVAKIA, PR 
AGUE,35,8,6,7,37,58,10 
4,139,143 

DATA DENMARK, COPENHAGE 
N,33,4,2,124,143 

DATA DJIBOUTI ,DJIBOUTI 
744,31,2,42,115 

DATA DOMINICAN REPUBLI 
C,SANTO DOMINGO, 13,28, 
2,55,106 

DATA EAST GERMANY, EAST 
BERLIN, 35,6,3,33,104, 
143 

DATA ECUADOR, QUITO,11, 
39,2,28,102 

DATA EGYPT,CAIRO, 41,20 
+5,65,78,77,110,121 
DATA EL SALVADOR,SAN S 
ALVADOR, 8, 31,3,50,56,9 


2 

DATA EQUATORIAL GUINEA 
*MALABO, 35,37,2,22,46 
DATA ETHIOPIA,ADDIS AB 
ABA, 43,33,4,35,71,115, 
121 

DATA FALKLAND ISLANDS, 
STANLEY, 18,71,1,5 
DATA FINLAND, HELSINKI, 
36,1,3,96,124,139 
DATA FRANCE, PARIS, 32,9 
6,10,66,119,125,135,1 
43 


DATA GABON,LIBREVILLE, 
35,38,3,22,29,41 

DATA GHANA,ACCRA, 32,36 
13,18,67,131 

DATA GREECE,ATHENS, 38, 
15,4,2,17,133,146 
DATA GREENLAND,GODTHAA 
B,21,6,2,23,59 


XM 


DB 


BB 
HE 
MD 
KC 
EM 
DP 


GI 


KC 


cs 


HS 


kQ 
ED 


Qc 
cc 
PG 
SF 


DR 
PH 
DQ 
cB 


KD 
BK 
cE 
HC 
EX 


PG 


xM 
XG 
XB 
BA 
XP 


BD 


OK 


EE 


1810 


1820 


1838 
1840 
1858 
1860 
1870 
1886 
1898 


1908 
1910 


1926 


1930 
1949 


19508 
1968 
1978 
1980 


19990 
2000 
2010 


2020 


20390 
2040 
2050 
2060 
2070 
2080 


20990 
2166 
2119 
2126 
2130 


2146 


2150 
2168 


DATA GUATEMALA, GUATEMA 
LA CITY,7,29, 1,46,5 
6,84 
DATA GUINEA,CONAKRY, 29 
131,6,52,67,76,82,111, 
112 





DATA GUINEA-BISSAU,BIS 
SAU, 28,31,2,51,111 
DATA GUYANA,GEORGETOWN 
117,35,3,16,122,141 
DATA FRENCH GUIANA,CAY 
ENNE, 18,37,2,16,122 
DATA HAITI, PORT-AU-PRI 
NCE, 13,27,2,31,36 

DATA HONDURAS, TEGUCIGA 
LPA,9,29,4,40,50,68,92 
DATA HONG KONG, VICTORI 
A,63,25,1,27 

DATA HUNGARY,BUDAPEST, 
36,10,5,7,33,108,139,1 
46 


DATA ICELAND, REYKJAVIK 
127,9,3,49,96,135 
DATA INDIA,NEW DELHI,5 
3,22,8,9,13,19,27,81,8 
9,98,128 

DATA INDONESIA, JAKARTA 
,62,43,5,6,100,103,113 
7120 

DATA IRAN, TEHRAN, 46,17 
75,1,63,98,133,139 
DATA IRAQ,BAGHDAD, 44,1 
8,6,62,70,72,110,126,1 
33 

DATA IRELAND, DUBLIN, 30 
6,1,135 

DATA ISRAEL, JERUSALEM, 
41,19,4,39,70,74,126 
DATA ITALY,ROME,34,12, 
4,7,45,125,146 

DATA IVORY COAST ,ABIDJ 
AN,31,35,5,18,47,51,76 
182 

DATA JAMAICA, KINGSTON, 
11,28,2,31,56 

DATA JAPAN, TOKYO, 68,17 
2,117,127 

DATA JORDAN, AMMAN, 42,2 
0,5,39,63,65,110,126 
DATA KENYA, NAIROBI, 43, 
38,5,42,115,121,128,13 
4 


DATA KUWAIT, KUWAIT CIT 
¥,45,22,2,63,110 

DATA LAOS, VIENTIANE, 60 
727,5,19,21,27,129,142 
DATA LEBANON, BEIRUT, 41 
717,3,32,65,126 

DATA LESOTHO,MASERU, 39 
57,1,116 

DATA LIBERIA,MONROVIA, 
29,34,4,16,51,67,112 
DATA LIBYA, TRIPOLI, 36, 
19,6,3,25,39,93,121,13 
2 


DATA MADAGASCAR, ANTANA 
NARIVO, 45,50,2,81,87 
DATA MALAWI,LILONGWE,4 
1,48,3,87,128,148 

DATA MALAYSIA,KUALA LU 
MPUR,61,36,2,113,129 
DATA MALDIVES ,MALE, 52, 
35,3,60,78,120 

DATA MALI,BAMAKO, 30,29 
17,3,18,51,67,83,93,11 
if 


DATA MAURITANIA, NOUAKC 
HOTT, 28,26,4,3,82,111, 
144 

DATA MEXICO,MEXICO CIT 
¥,/5,27,3,11,50,138 
DATA MONGOLIA,ULAN BAT 
OR, 58,9,2,27,139 
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BM 2170 


RD 2180 


BQ 2196 


RE 2206 
2210 
2220 
2230 


2240 


2258 
2260 


2270 
2280 
2290 


2360 


2310 


2320 
2336 
2348 
2350 
2360 
2376 
2380 
2390 
2400 


2410 


2420 
2430 
2440 
2450 
2460 


2470 


2480 
2490 
2500 
2510 
2520 


2530 


JD 2540 


DATA MOROCCO, RABAT, 31, 
18,3,3,119,144 

DATA MOZAMBIQUE ,MAPUTO 
141,54,7,78,79,116,123 
128,148,149 

DATA NAMIBIA,WINDHOEK, 
37,53,4,4,15,116, 148 
DATA NEPAL, KATHMANDU, 5 
5,21, 2,27, 68 

DATA NETHERLANDS ,AMSTE 
RDAM, 33,6,2,10,143 
DATA NEW ZEALAND ,WELLI 
NGTON , 86,64,2,6,148 
DATA NICARAGUA, MANAGUA 
19, 31,3, 30,40, 56 

DATA NIGER,NIAMEY, 33,2 
9,7,3,12,18,25,77,82,9 
4 


DATA NIGERIA, LAGOS, 34, 
34,4,12,22, 25,93 

DATA NORTH KOREA, PYONG 
YANG ,65,14,3,27,117,13 
9 

DATA NORWAY ,OSLO, 33,1, 
4,44,59,124,139 

DATA OMAN, MUSCAT, 48,24 
13,110,118,137 

DATA PAKISTAN, ISLAMABA 
D,51,18,5,1,27,60,62,1 
39 

DATA PANAMA, PANAMA CIT 
¥,11,33,2,28,30 

DATA PAPUA NEW GUINEA, 
PORT MORESBY,78,45,3,6 
161,114 

DATA PARAGUAY,ASUNCION 
117,55,375,14,16 

DATA PERU,LIMA,12,47,5 
114,16, 26,28, 38 

DATA PHILIPPINES,MANIL 
A,66,31,2,61,127 

DATA POLAND,WARSAW, 36, 
6,3,33,37,139 

DATA PORTUGAL, LISBON,3 
0,14,1,119 

DATA PUERTO RICO,SAN J 
VAN, 14,27,2, 36,141 
DATA QATAR,DOHA, 46,23, 
2,110,137 

DATA ROMANIA, BUCHAREST 
138,11, 4,17,58,139,146 
DATA RWANDA, KIGALI, 46, 
39,4,20,128,134,147 
DATA SAUDI ARABIA,RIYA 
DH ,45,24,9,39,63,70,72 
197,107, 118,137,145 
DATA SENEGAL, DAKAR, 28, 
28,5,51,52,82,83,130 
DATA SIERRE LEONE,FREE 
TOWN, 29,33,2,51,76 
DATA SINGAPORE,SINGAPO 
RE, 61,38,2,61,80 

DATA SOLOMON ISLANDS,H 
ONIARA, 83,43,2, 100,148 
DATA SOMALIA,MOGADISHU 
145,36,3,35,42,/71 
DATA SOUTH AFRICA, PRET 
ORIA, 39,55,6,15,75,87, 
88,123,149 

DATA SOUTH KOREA, SEOUL 
165,17,2,69,95 

DATA SOUTH YEMEN,ADEN, 
45,30,3,97,110,145 
DATA SPAIN,MADRID, 32,1 
3,3,45,86,105 

DATA SRI LANKA,COLOMBO 
154,35,3,60,61,81 
DATA SUDAN, KHARTOUM, 41 
1298, 24,25, 39,42, 71,7 
7,134,147 

DATA SURINAM, PARAMARIB 
0,18,35,3,16,53,54 
DATA SWAZILAND,MBABANE 
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Jd 
xB 
DK 
ME 


AQ 


RP 
DE 
SR 
EJ 
DE 


MC 


Qs 


BX 
BC 


xQ 


Kc 


ec 


ED 


DQ 
DE 


FJ 
FX 


KK 


KE 


AP 


DR 


2550 
2560 
2578 
2580 


25908 


2600 
26168 
2620 
2636 
2640 


2650 


2660 


2670 
2680 
2690 


2700 


2710 


2726 


2738 


740,56,2,87,116 

DATA SWEDEN, STOCKHOLM, 
35,3,3,34,44,96 

DATA SWITZERLAND,BERN, 
33,9,4,7,45,66,143 
DATA SYRIA,DAMASCUS , 42 
117,5,63,65,70,74,133 
DATA TAIWAN, TAIPEI, 65, 
23,3,27,69,163 

DATA TANZANIA,DAR ES S 
ALAAM, 43,43,8,20,71,79 
,87,109,134,147,148 
DATA THAILAND,BANGKOK, 
60,31,4,19,21,73,80 
DATA THE GAMBIA,BANJUL. 
+ 28,29,1,111 

DATA TOGO, LOME,32,35,3 
712,18,47 

DATA TUNISIA,TUNIS,35, 
16,2,3,77 

DATA TURKEY, ANKARA, 40, 
14,6,17,48,62,63,126,1 
39 


DATA UGANDA, KAMPALA, 41 
738,5,71,109,121,128,1 
47 
DATA UNITED KINGDOM, LO 
NDON, 31,6,4,10,45,59,6 
4 


DATA URUGUAY,MONTEVIDE 
0,18,61,2,5,16 

DATA U.A.E.,ABU DHABI, 
47,23,3,97,107,110 
DATA U.S.A.,WASHINGTON 
DsGop12¢157518/23, 31, 
84,139 

DATA U.S.S.R.,MOSCOW,4 
@,4,14,1,27,33,44,58,6 
2,85,95,96,98, 104,108, 
133,138 

DATA VANUATU, PORT-VILA 
187,49,3,6,91,114 
DATA VENEZUELA,CARACAS 
114,32,4,16,28,53,106 
DATA VIETNAM,HANOI,61, 





~ 26,3,21,27,73 


2748 


2750 
2768 


2778 


2780 


2798 


2800 


DATA WEST GERMANY,BONN 
134,8,8,7,10,33,34,37, 
45,906,125 

DATA WESTERN SAHARA,LA 
AYOUNE , 29,21,3,3,83,86 
DATA YEMEN,SAN'A, 44,29 
2,110,118 

DATA YUGOSLAVIA,BELGRA 
DE,36,11,7,2/7/17,48,5 
8,66,108 

DATA ZAIRE, KINSHASA, 37 
141,9,4,20,24,29,109,1 
21,128,134,148 

DATA ZAMBIA,LUSAKA, 40, 
48,8,4,15,79,87,88,128 
147,149 

DATA ZIMBABWE,HARARE,4 
0,50 ,4,15,87,116,148 





SaSaaassaaissaags 





What do the C-64, THE C-128, 
the Amiga and the IBM 
all have in common? 


Us. 


We're Software Support International. For 
the last several years, we've specialized in 
doing just one thing: serving the needs of the 
Commodore computer community. We develop 
our own software 
and hardware. We 
also enable our cus- 
tomers to enjoy sub- 
m= stantial savings on 
‘thousands of the 

best products ever 
¥ made for their com- 
puters. And most 
importantly, we pro- 
vide what has often 
*s been described as 
J the best technical 
support available in 
the industry today. 

Do business with us just once, and we'll 
proudly show you the differences that set us 
apart. We stock our products, so most orders 
are filled and shipped the same day that they're 
received, no extra charge. Unlike many other 
companies, we don't penalize you for using your 
credit cards - we add no surcharge for VISA, 
MasterCard, or Discover card orders. And once 
you become a customer of ours, you'll get addi- 
tional benefits. We'll ship your orders im- 
mediately, without waiting two weeks for your 
personal check to clear. We'll let you order 
C.O.D., even though so many other companies 
no longer do. And our regular customers get 
special offers that are not made available to the 
general public. 

Many of you are familiar with us. In fact, 
many of you are already our customers. If you 
are, you know what we're talking about - and if 
you aren't, you don't know what you're missing. 




















In any case, we'd like to introduce you to 
our current product line up. In the past we've 
bought several pages of advertising in several 
magazines month after month, and still we've 
only been able to tell you about a fraction of our 
available products. Now we'd like to try some- 
thing new. 

Just give us a quick call on our TOLL FREE 
line, and we'll send you our latest 64 / 128 / 
Amiga / IBM product listing, a colorful catalog 
of over 50 pages jam-packed with the newest, 
the hottest, the latest software and accessories 
available for your computer today - and ALL at 
discount prices that are so low you'll have to 
see them in print to believe them! 

Other companies come and go. Some even 
crop up just in time to “cash in” on the Christmas 
season each year, only to disappear when you 
need their support most. Not us. We've been 
here for years. Give us a chance to show you 
why. 

Do something good for your budget, your 
computer, and your peace of mind and call us 
today - the money you save will be your own. 


FREE CALL — FREE CATALOG 
WHAT ARE YOU WAITING FOR? 


1-800-356-1179 


FOR CUSTOMER ORDERS OR YOUR FREE CATALOG 


SOMWARE SOFTWARE 
-4 SUPPORT 
SUpeOM! INTERNATIONAL 


Big Enough To Serve You. 
Small Enough To Care. 


(C)1990 SOFTWARE SUPPORT INTERNATIONAL * 2700 NE Andresen Road Suite A-1, Vancouver, WA 98661 * 206/695-1393 
C-64, C-128, Amiga, and IBM are registered trademarks of Commodore Business Machines and IBM. 
Circle Reader Service Number 104 


International Bounty Hunter 


C686:77 77 76 77 :77:77:«77 
C688:66 66 FF FF 56 56 66 


C770:66 77 77 77 77 67 66 
C778:77 66 66 66 66 FE 66 
C780:66 77 77 22 22:77 77 
C788:EE EE 22 22 22 22 27 
C790:88 88 88 88 88 88 77 
C798:77 22 27 22 62 66 FF 
C7AG:66 60 GO OO FF FF 66 
C7ABi44 44 44 44 44 44 44 
C7BO:66 77 77 77 77 77 76 
C7B8:66 66 FF FF 66 67 77 
C7C0:88 85 55 77 22 22 BE 
C7C8:22 22 27 77 78 ED 88 
C7D0:77 77 77 22 62 66 66 
C7DB:FF 66 GG GO 66 66 FF 
C7E0:66 66 66 44 EF 44 44 
C7E8:66 66 77 74 44 77 77 
C7FO:FF FF 77 22 26 44 47 
C7F8:72 66 26 22 22 26 62 
C800:62 EE 77 77 77 88 88 
C808:88 88 87 77 77:77:77 
C816:66 FF FF G0 66 66 66 
C818:FF 66 64 44 44 44 EF 
C820:64 67 44 44 46 66 66 
C828:66 FF FE 66 65 55 77 
C830:26 64 44 77 76 66 66 
C838:22 26 62 22 66 22 22 
€840:22 22 77 77 77 77 88 
848:88 88 77 77 77 77 72 
C850:66 64 44 FF 66 66 66 
C858:66 FF 66 66 66 66 64 
C86G:EF 76 44 44 66 66 FF 
C868:66 66 66 66 55 55 56 
C870:22 26 64 48 86 66 66 
C878:22 22 66 22 EE 22 77 
C880:77 77 77 88 88 87 77 
C888:77 77 75 66 66 64 46 
C890:66 FE FF FF 66 66 44 
C898:44 EF EF FF FF FF 66 
CBAG:25 55 56 66 66 22 67 
CBA8:54 44 44 44 44 22 26 
C8BG:22 22 22 22 22 77 77 





C8C0:66 64 FE EF FF FF EF 
C8C8:44 44 44 66 66 FF FF 
CB8DG:25 55 66 66 66 62 66 
CBDB:64 44 44 44 44 27 76 
CBEG:22 22 22 22 42 77 77 
C8E8:77 FE 77 77 66 76 55 
CBFO:66 66 46 66 FF FF FF 
C8F8:66 66 44 44 EF EF 46 
C900:66 66 66 FF FF 66 66 
C908:65 66 62 22 66 66 66 
C910:64 44 44 44 44 47 77 
C918:77 77 24 44 44 27 FE 
C920:76 66 65 86 66 66 46 
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C928:66 
C930:44 
C938:FF 
C946:44 





C950:44 
C958:77 
C96O:FF 
C968:EF 
C970:366 
C978246 
c98G788 
C988:45 
C996:77 
C998:66 
C9IAG344 
COABIEF 
c9B0:44 
c9B8:85 
C9C8:45 
C9CB:64 
C9D6:55 
C9DB:66 
C9EG:72 
C9E8:55 
C9FO:77 
C9FB:77 
CAGG:64 
CAGB: 66 





CA18:FF 
CA26:22 
CA28:22 
CA36:55 
CA38:77 
CA4G:FF 
CA4B: 46 
CASO:FE 
CA5B:52 
CA6G:55 
CA68:66 
CA76:84 
CA78:66 
CABG:56 
CA88:46 
CA90:66 
CA9B8:22 
CAAG: 22 
CAA8:58 
CABO:77 
CABS: 66 
CACO: 66 
CACB:55 
CADG:55 
CAD8:57 
CAEG:38 
CAE8:77 
CAFO:FF 





CB38:FF 
CB4G:8 
CB48:62 
CB50:66 
cB58:44 
CB6G:66 
CB63:66 
CB70:66 
CB78:66 
CBaG:88 
CBB8:66 
CB90:66 
CB98:44 
CBAO:EF 
CBA8:55 
CBBO: 26 
CBB8:77 
CBCO:22 
CBCB8:55 





CBDG: 88 
CBD8:66 
CBEQ:FF 
CBES:FF 
CBFO:88 
CBF8:56 
CCOO:66 
CCOBI44 
CC10266 
CC1B8:66 
CC20:66 
CC28:88 
CC38355 
CC38:66 
CC40366 
CC48:66 
CC5G:FF 
CC58:FF 
CC60:55 
CC68:55 
CC78:66 
CC78: 26 
CC8O:FF 
CCB8:66 
C90: 66 
cc98:55 
CCAG:55 
CCAB: 66 
CCBO: 26 
CCB8:FF 
CCCO:66 
CCC8366 
ccp6:55 
CCD8:55 
CCEO: 66 
CCEB?66 
CCEO:66 
CCF8:55 
CDOG:FE 
CDa8:55 





D18:76 
CD20:66 
CD28:FF 
CD38355 
CD38: 66 
cb40:58 
b48:55 
CD50:66 
CD58: 66 
CD6G:FF 
CD68: 66 
CD70366 
CD78:88 
CD8G:58 
CD88: 66 
CD90:65 
CD98: 66 
CDAG: 66 





CpBG:88 
CDBB:66 
CDCG:66 
CDCB:FF 
Cppe:55 
CDD8: FE 
CDEG388 
CDES:FF 
CDFO:66 
CDES:FF 
CEGG:64 
CEG8:66 
CE10:88 
CE18:66 
CE20:65 
CE28:FF 
CE30:77 
CE387365 
CE40;22 
CE48:65 
CE5O:FF 
CES8:44 
CE60:77 
CE68:66 
CE70:44 


International Bounty Hunter 


CE78:66 
CE8G:56 
CE88:FF 
CE9G:FE 
CE98:66 
CEAG?44 
CEA8: 66 
CEBO:55 
CEB8:66 
CEC@:77 
CECB:FF 
CEDG:88 
CED8:FF 
CEEG:65 
CEE8:FF 
CEFO:FE 
CEF8:88 
CFOO:66 
CEOB:66 
CF10:66 
CF18:65 
CF26:77 
CF28:88 
CE30:EF 





CF46;66 
CE48:66 
CF50:76 
CF58:66 
CF6G:44 
CE68:FF 
CE7G:FF 
CF78:87 
CE8G:66 
CF88:25 
CF90:66 





CEAG:EF 
CPA8:66 
CFBG:66 
CEBB:88 
CECG:66 





CPDG:66 
CFD8:77 
CFEG:66 
CFES:88 
CEFO:EF 
CFF8:66 
DO0G:66 
DGG8:77 
DO1G:FF 
0018:86 
DO20:FF 
DG28:26 


D120:66 
D128:FF 
D130:22 
D138:FF 
D140:55 
D148:66 





D158:FF 
D160:22 
D168:FF 
D170:77 
D178:77 





D188:66 
D190:55 
D198:66 
DLAG:77 
D1LAB: 66 
D1BG:FE 
p1p8:55 
DICO:FF 
D1C8:FE 
D1D8:66 
D1D8:66 
D1EO:55 
DIES:FF 
DIFG:FE 
DIP8:66 
D200:EF 
D208:55 
D210:FF 
D218:66 
D220:66 
D228:FF 
D230:66 
D238:FF 
D240:22 
D248:EF 
D250:EF 
D258:FE 
D26G:FF 
D268:55 
D270:FE 
D278:66 
D286:66 
D288:55 
D290:FE 
D298:66 
D2A0:66 
D2A8:66 





D2Ba:FF 
D2c6:66 
D2c8:55 






DO38:88 
DO40:FF 
DO48344 
DO50:66 
DG58:22 





DG68:77 
DO70:66 
D078: 66 
DG8G:FF 
DO88;22 
DO9G:FF 
DG98:77 
DOAG:FF 
DOAB: 44 
DOBG:EF 
DOBS:EE 





DGC8:77 
DODG:66 
DOD8:66 
DOEG:FF 
DOES: 66 
DOFO:77 






D1G6:FE 
D1G8:22 
D116:FE 
D118:77 


D2F8:FE 
D300:45 
D308:FF 
D310:FE 
D318:FF 
D320:PF 
D328:FF 
D330:66 
0338245 





D348:66 
D350:FF 
D358:FF 
D360:FE 
D368:66 
D370:66 
D378:FE 
D380:06 
D388:FE 
D39G:FE 
D398:66 
D3AG8:66 
D3A8:FE 
D3BO:FE 
D3B8:FE 
D3CO:FE 


D3C8:66 
D3D0:66 
D3D8:FE 
D3E0:66 
D3E8:00 
D3FO:61 
D3F8:FF 
DAGG:00 
D408:66 
D410:16 
D418:16 
D420:11 
D428:66 






D438:16 
D440:66 
D448:66 
D450:11 
D458:00 
D460:66 
D468:11 
D470:16 
D478:DE 
D480:66 


IBH Map Expand 
KX 5 REM *** IBH MAP EXPAND ** 
* 


XQ 10 GRAPHIC1,1:GRAPHICO:BANK 
G:PAST:0P=56000:NP=8192: 
BLOAD"IBH MAP BASE",BG,P 
50000 

A=PEEK (OP) : IFA>220THENSO 
POKENP, A: POKENP+1, PEEK (O 
P+1) : POKENP+2, PEEK (OP+2) 
+ POKENP+3, PEEK (OP+3) 
POKENP+4 , PEEK (OP +4) :0P=0 
P+5:GOTO140 
IFA=255THENB=162:GOTO130 
IPA=254THENB=119:GOT0130 
IFA=238THENB 070136 
IFA=239THENB=68 :GOTO136 
IFA=253THENB=85 :GOTO136 
IFA=237THENB=136:GOTO13 
8 
IFA=221THENB=0:GOT0130 
IFA=222THENB=17 

POKENP ,B: POKENP+1,B: POK 
OKENP +3 ,B3 POKE 
P=OP+1 

NP=NP+5: IENP<16376THEN2 
8 

BSAVE"IBH MAP DATA",BG, 
P8192T0P16376:SLOW G 














COMPUTE!’s Gazette is 
looking for utilities, games, 
applications, educational 
programs, and tutorial 
articles. If you've created a 
program that you think other 
readers might enjoy or find 
useful, send it, on disk, to: 


Submissions Reviewer 
COMPUTE! Publications 
P.O. Box 5406 
Greensboro, NC 27403 


Please enclose an SASE if 
you wish to have the 
materials returned. 
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by gk Roses are 
“SD of A hasa 
@() We have what 





ACCOLADE “Font Pak Plus $19 
Blue Angels Fight Sim ..$19 *Geo-Chart $19 
Bubble Ghost » $19 *Geo-Cale $33 
Cycles Cal ‘GeoFile a 
Fast Break $19 “Goo-Programmer ...1. S84 
Grand Prix Gircut |..." $19. *Goo- Publish $3 
Heat Wave Boat Racing.. $19 “Requires Geos Gal 
‘Jock Nicklaus Gol... 319 BLUE LION 


IN. Git Chimp, Courses $9.88 Ticket to Hollywood .... $19 


JIN Git Intl Courses ,. $9.88 Ticket to London, ......819 

Min Putt $19 Ticket to Pans . $19 

Rack Em $19 Ticket to Spain’... $19 

Serve & Volley $19 Ticket to Wash D.C. -°1'$23 
HE Site Trance $12. BRITANNICA, 





Mat omes Tre Bi. 313 BTA 
Crop Seon Soe OLHONR yeonnn $5 


See Our Under $10 Bargain Basement. |}) 2 83 S%-4?"exe 


$2 
Ea 
$19 Carmen 50. = World... $23 
$14 
Std 
$23 























ACCOLADE Swit Paint $688 On Coun Tennis ...... $988 Gauntiet 1 $988 ACTIVISION Bowntwli Chalonge 
Ace ot Aces $988 Swit Spreadsheet \°'* $688 Star League Baseball Hamer Combat Sim ..| $988 Battiecness $25. Licence to Kill , 
Apolo 18 $288 Swi Word Procesor. $688 On Field Fool... $268 {Jones Tempe Doom. $988 Beyond Da Cast |$19_ OP Basa 
Wubble Ghost «°°! $9.88 EAST rake Down (Car) «5. $988 
42h & Inches Fetal: $988. Ra Women... $988 GAMETEK Papuroey i | THUNDER MOUNTAIN 
‘in & Inches Team Paatoon $e68 Candy Lana $9.8 Pole Position 2 $988 
$6.88 naa : ‘Chutes & Ladders ‘$988 Road Runner $988 | Wow! 10 great games for 
eed Double Dave $958 720Skatebowding ... $988 | one low price! The Mist 
058, BEAKER g68 G0 TO Hoad of Ciass ., $988 SHARE DATA Bop'n Wrestle » Tau Ceti 
Leow $688 Hollywood Sqvares...| $988 Al/New Famiy Feud... $882 | Eabies Nest + Wiz. Ball 
sous panne $B88 Press Your Luck $988 Concentration sess | Eagies Nost'+ Wiz Ba 
$288 crn 58 Super Password $988 Concentration? ses | Rock Roll Trivia + Uridium 
88 \ONIC ARTS XPRESSIONS copa $358 ° a 
ie Kn CMOS sone PLTEEHENDRESHIONS, | Sseeyoy 248 | Great Escape + Bad Street 
. a fina et) aed Looney Tunes Print Kit $988 Jeopardy 2 a 
n Sports seopar 
$e Soo 88 Muppet Aavertire «..« $308 reir ssa | Action Pack Vol. 1 rm 
$988 talkers Romane Cor Wheel of Fortune 2°. $388 
Ey etre Stas ampem Corio. SBS of Forune 2. $888 | Value $150 Discount Price $ 
‘ADVANTAGE beets ++ $288 Win, Lose or Draw2 «,: $888 Wipe Out 5988 Crossbow S19 Print Shop $26 
Frightmare..,...,+.+. $988 Legacy ol Ancients ...- $888 Win, Lose or Draw ur. $868 SPECTRUMHOLOBYTE Dragon Wars $29 P'S Companon $23 
Hamer 7 pout UT yeep frerlarnge soapy Gato $988 F14 Tomeat $25 PS Graptics Ubiary 
‘Mental Blocks * Spa Marble Madness F18 Hornet $23 1.2018 S16 Ea 
Farsteoys (satel e Yack Cal PS Graphics Li 
Modem Wars Cosme Combat ....,. $48 Glave Yardage Cat PS Graphics vary 
pecan ae Bencrener $48 Lust Nina 2 $2. Hotaay Eanon i 
Pere fee chee ee $23 Star Wars 1319 
Pinbell Const ‘Set 2.2.2 $088 ‘Big Splash .- $688 Loam the Alphabet .... $488 Rampage ir War 
Powerplay Hockey»... $268 Esme's Magee Shapes..$688 Lear to Speit 5488 AMERICAN EDUCATIONAL CAPCOM 
Ream! mpossBliy. $766 Glovers Arma Adv. $688 Leam to Add $488 Bology $12 Bone Gonmando »-..--$18 
Skylox $263 Pas Nowrd Town -. $658 spRINGBOARD rao Read (Gr 14) 1$25 | Ghosts & Gobbins |... $18 
Seyfon2 see rat Kt Corteste aner...... $908 Seerce Grages 4... 812 Guremoke sig 
‘Skate of De. $268 INFOCOM CM Litrary Vol 1 sane) Science: Grades 5/5, - 23812 > Sveat Fic 
Strike Fleet $268 Hichhiaers Gude ..... $958 Newsroom Sse Sconce Grades 718...'S12 CENTRAL POINT 
High Roiters & Super Boulder Dash ... $988 Leather Goddesses |||. $986 NA An#I,2.o'3. $088 Ea US Geography $12 Cony? $25 
$100,000 Pyramid ..... $988 Wasteland $268 Zork! $988 Taro US History 512 CINEMAWARE Z 
RROnERG UNG World Tour Gait $988 INTRACORP. “pak so.85 World Geography $12 Deland of the Crown. $23 
Arcade Game Const Kit$988 EPYX ‘Business Card Maker .. $988 Arkanod sana, World History $12 Rocket Range a 
Choplitter/Davids 4=4 Ott Road Racing . . $988 KONAMI/ACTION CITY Bubble Bobbie $988 ARTWORK TV Sports Foot F 9 
Midnight Magic ..... $688 Boulderdash Const Kit $9.88 Hyper Sports/Ping Pong $988 Renegade Sans Brage 50 Se ees aemesiele 
Karateka.....-.....5, $688 Jet Combat Simutor, $983 MASTERTRONIC THUNDER MOUNTAIN Cycle Knight OS 
Loderunner 221.225, $688 Space Station Oblivion. $988 Last V-8. ++ $488 Galaxian’ $6.43 Pally Double: ata hee ae 
Magnetron +++, $988 Spy vs. Spy9......... $988 Ninja +. $488 Rambo: First Blood eared! Hp oie pes S198 
Superbike Challenge .. $688 Temple Apshai Triogy..$888 Siam Duk $668 Parti eters Beegehiy seckesaben rend 3. OMEN 
GINEMAWARE CLASSICS Winter Games, $288 Vegas Pokor & Jackpot™$488 Super Pac Man Sos Lrzword Languages. $18 Ea Inventory 12, 
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WAGE WAR AGAINST THE 
EVIL DROIDS IN THIS 
GRAPHICALLY STUNNING, 
ARCADE-STYLE GAME FOR 
THE COMMODORE 64, 





The Solar System was once a safe place 
to live, But that was long ago. Now it’s 
the year 2500, and those infernal droids 
have returned. 

In Planet Raider, the droids have 
positioned eight war satellites around 
Earth and are preparing to attack. Only 
a quick strike can stop this mutant life 
form. Guess what? You've been select- 
ed to lead this mission, So ready your 
troops and blast off for action! 


Getting Started 

Planet Raider is written entirely in ma- 
chine language. To type it in, you'll 
need to use MLX, the machine language 
entry program found elsewhere in this 
issue. When MLX prompts you, re- 
spond with the values given below, 


0801 
1AD0 


When you've finished typing, be sure to 
save a copy of the program before exit- 
ing MLX, 

Although it’s written in machine 
language, Planet Raider loads and runs 
like a BASIC program. When you're 
ready to play the game, plug a joystick 
into port 2. Then load the program and 
type RUN, 

Note that if you press RUN/STOP- 
RESTORE after the game begins, you 
can’t restart it by typing RUN. Instead, 
you must reset the computer and then 
load and run the program again. 


Starting address: 
Ending address: 


Playing the Game 

In Planet Raider, your mission is to lo- 
cate and destroy all the enemy bases 
that defend the eight droid satellites. 
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A dangerous surface maze in Planet Raider. 


When the game begins, your ship ap- 
pears in the center of the screen, above 
the surface of a droid satellite, Across 
the top of the screen from left to right is 
your score, the number of ships remain- 
ing, the amount of time that you have 
left to destroy the enemy bases on the 
current satellite, and a fuel gauge. 

To control your ship, use the key- 
board. The Commodore key rotates the 
ship counterclockwise; the left SHIFT 
key rotates it clockwise, To provide 
thrust, hold down the cursor-down key, 
To move in a certain direction, rotate 
the ship and then thrust, Use a light 
touch on the keyboard; if you overdo it, 
you'll lose control of your ship. 

To fire on an enemy base, press the 
cursor-right key. The space bar (or the 
right SHIFT key) activates your shield/ 
tractor beam. The shield is impenetra- 
ble to all fire, both your own as well as 
that from the enemy bases. Use the 
shield judiciously since it consumes 
fuel rapidly. The tractor beam is used 
for refueling, as described below. 


The red objects on the surface of 
the satellite are the enemy bases, which 
fire at you periodically. If they hit you 
or if you contact the satellite's surface, 
your ship explodes. Also, if you run out 
of fuel, your ship will crash into the sur- 
face and explode. 

In order to refuel, you must de- 
scend to a fuel depot (they are the blue 
squares found on every satellite) and 
activate the shield/tractor beam, Watch 
the fuel gauge when you refuel. If it 
goes up, then you’re refueling properly; 
otherwise, move closer to the fuel depot 
and try again, When the fuel depot is 
empty, a beep signal will be emitted 
and the depot will disappear from the 
screen, 


Scoring 
If you destroy an enemy base, you're 
awarded 30 points. When the message 
MISSION COMPLETE flashes over the 
time limit, there are no more enemy 
bases on that satellite. Destroying, ail 
the bases on a satellite and leaving it 
within the time limit shown on the top, 
of the screen adds a time bonus to your 
score, To travel to the next satellite, 
thrust upward into outer space over the 
point where you approached the satellite. 
There are eight satellites per level. 
If you destroy every enemy base on a 
level, you're awarded two extra ships. 
You also receive an extra ship when 
you accumulate 1000 points and anoth- 
er one for every 2000 points thereafter. 
Once you've purged all eight satel- 
lites of enemy bases, you move to the 
next level. As you advance from level to 
level, the gravitational forces exerted by 


a satellite on your spaceship alternate 
between attractive and repulsive. For 
example, on level 1, gravity pulls you 
toward a satellite; on level 2, it pushes 
you away; on level 3, it attracts again; 
and so on, You'll soon learn that these 
gravitational forces can be just as dan- 
gerous as the enemy fire, especially 
when it comes to navigating the treach- 
erous mazes found on some satellites. 

In addition to the alternating gravi- 
tational effects, the satellites (but not 
the bases) are invisible on levels 3 and 
4, The only way to locate their surfaces 
is to activate your shield/tractor beam. 
The gravitational and visibility effects 
repeat after level 4 (level 5 has normal 
gravity and visibility, level 6 has 
reverse gravity and normal visibility, 
and so on). 

Finally, if you need to pause the 
game or restart it once it ends, press 
RETURN, 


Planet Raider 

9801:0B 08 GA GO 9E 32 30 36 2E 
9809:34 Gd G6 GO BO 
@811:2A 16 20 B7 16 26 D1 13 F2 
9819:A2 GA A9 OO 85 BB 9D 46 CB 
9821:03 A9 CB 9D FB 07 CA 19 99 
9829:F1 86 BE A9 35 85 BA A9 25 
9831:Cl 8D F9 G7 AI D@ BD FB DD 
0839:07 A9 15 8D 
@841:A2 18 8D C@ 13 BE Cl 13 CF 
@849:86 BF 20 C6 12 A2 AA AS 13 
@851:BB 29 10 85 BC DG G2 A2 B3 
@859:FF 







8869:01 
9871:B3 A5 BB 29 G8 49 DB 85 6B 
@879:B6 A2 G1 86 B8 86 E9 CA 16 
@881:A0 84 84 G9 96 2E 88 DB 73 
9889:FB AG G3 20 23 12 20 EF B3 
9891:0F 26 34 14 20 1F 6B 26 AC 
@899:17 GC A5 35 DO 22 AS 44 DE 
@8A1:F0 1E AS 41 38 ES 42 85 DD 
G8A9:41 8D 67 D4 AS 43 E9 OG FO 
@8B1:85 43 8D G8 D4 E9 1C DO DE 
98B9:07 85 44 A9 10 8D OB D4 73 
@8CL:AD 1E DG AD 1F DG AB 4A FC 
98C9:90 G3 20 BI GA CO 68 90 76 
@BD1:GF A2 OB 9B 
98D9:03 20 5B GF CA CA 10 F3 65 
@8E1:20 41 GE A5 33 FG G3 4C 1E 
@8E9:FE OC AS B3 C9 40 FO B4 AL 
@8P1:C5 BS DG G3 4C 4B BD C6 GD 
@8P9:48 14 99 A9 20 85 48 AE 56 
G901:F8 97 A9 FD 8D G@ DC AD 3A 
9909:G1 DC G9 7F C9 7F DG Gl DA 
@911:E8 A9 16 8D GB DC AD G1 6D 
9919:DC C9 FD DG GA CD Gl DC 3F 
@921:F0 FB CD G1 DC DG FB 85 1c 
9929:C5 @9 DF C9 DF DG G1 CA G8 
@931:C6 3D 10 GC AX B4 85 3D 5E 
9939:8A 29 GF G9 Dd BD FB 87 G3 
9941:A5 C5 G9 FB A6 C6 85 C6 9A 
9949:C9 FB DG Gl E8 DG 7F A5 98 
9951:46 306 74 A2 GA CA CA 3G 8C 
9959:75 B5 7E DO FB 86 @2 AE G5 
9961:F8 G7 26 3A GA 84 G3 AG 68 
9969:02 AD 15 Dd 1D 74 GF 8D FD 
@971:15 D@ EB AG 
0979:9D 06 DO BY 2F GG 4A 85 25 
9981:62 B9 22 G0 FG G4 AY FF 32 
0989:D0 G2 A G1 95 92 59 EB SC 
G991:06 O68 84 64 A4 G3 BI AD CB 
9999:GA 28 DO G5 18 65 62 DB 5B 
G9A1:11 38 ES 62 BO BC ED OG BO 
G9A9:49 FF AB BS 92 49 FE 95 1E 
99B1:92 98 AB B9 GO C6 95 7E AB 


99B9:95 88 AS G3 18 69 04 85 91 
G9C1:G3 A4 G4 CA 88 10 AE AQ 37 
99C9:7G A2 26 20 Al 16 AG 4C AD 
@9D1:DG 52 A9 99 85 45 85 47 43 
G9D9:A5 






@9E9:05 

G9F1:20 80 10 86 34 86 46 AS BC 
@9P9:C5 G9 77 C9 7F DB 21 AE ED 
GAG1:F8 G7 26 52 GA AS 46 30 20 
GAG9:G8 AG 13 20 8G 10 20 30 62 
GA11:GA C6 34 10 17 AO 06 85 54 
GA19:34 26 3A 10 90 GE 84 4C AD 
GA21:A5 46 30 ED A9 40 8D 12 F9 
GA29:D4 20 30 GA 4C 95 OB A2 Cl 
@A31:06 8E 27 D@ AS BC 85 BD C6 
9A39:60 8A 29 G7 AB BA 29 O8 7E 
@A41:85 22 A9 G8 EG DC BO G6 38 
GA49:E8 D4 90 62 AD OO 
GA51:60 20 3A GA A2 OO BS 3F 45 
GA59:29 G3 48 BS E8 29 08 55 78 
GA61:22 DG GB 68 18 79 Al GA 96 
@A69:C9 G4 96 28 BO 1l 68 38 CA 
GA71:F9 Al GA BO 1F D6 2F 10 F9 
GA79:GA BS E8 49 FE 95 E8 F6 CB 
@A81:2F 30 F2 48 84 22 BA 2F 61 
GA89:B9 G1 C6 DS EC BO G2 95 B4 
GAQ1L:EC A4 22 68 95 3F CB CB 14 
GA99:C8 CB EB EG G2 DB B7 60 92 
GAA1:00 G1 G2 03 G4 G3 G2 G1 97 
GAA9:GG G1 G2 G3 38 30 27 16 55 
GAB1:G@ 16 27 30 38 30 
GAB9:84 03 A2 GE 86 G2 BS SE OC 
GAC1:FG G3 20 93 BC CA CA 10 7D 
GAC9:F5 AS 46 10 GB AS 39 36 85 
GAD1:04 86 39 FG 46 C6 BA 4E DG 
@AD9:15 DG GE 15 D@ A2 GG BE SF 
@AE1:5F Cl E8 8E @1 D4 AI CB 93 
@AE9:85 33 A9 F9 85 32 AD G1 B3 
GAF1:D8 8D FF CO AD OO DG BD 7A 
GAF9:DF C@ C6 33 A6 33 EG Cl BF 
@BG1:FG GB AG 1F 20 54 GB C6 87 
9BG9:02 





@B19:F9 

@B21:D8 18 AS BE 85 A7 C6 AB 4A 
0B29:10 16 AS GA 29 87 85 AB BC 
@B31:A2 GE B4 5E FO @5 CA CA 94 
9B39:10 FB 66 86 G2 4A 90 G1 65 
@B41:88 CB C4 31 BO F4 AD 12 40 
0B49:D0 4A 96 PS BE 20 Cl E@ AG 
@B51:C2 90 EE B9 CO CO 29 B7 CB 
6B59:FD 4F GB 85 26 GB 38 BY 77 
@B61:48 Cl D@ G1 18 BY CB CB IC 
GB69:6A 4A 4A 28 E9 O01 C9 28 22 
0B71:BG CF 85 24 B9 EO CO ED 83 
@B79:3E FD 49 GB 85 27 4A 4A AF 
@B81:4A C9 16 BG BC 85 25 AD FO 
@B89:12 DG G8 29 G7 E9 G1 28 7A 
@B91:10 64 £9 OO 49 FF 18 7D ES 
@B99:43 GB 29 OF G9 DO AA 20 2B 
@BA1L:3A GA 84 G3 AG G2 EB AD C7 
@BA9:G1 BO 22 GG FO G4 AO FF DD 
@BB1:DG G2 A9 Gl 9D EG G2 BI 24 
@BB9:24 G@ 95 C8 BY 26 GO 29 BO 
@BC1:07 38 F9 37 GO 29 G7 95 64 
@BC9:D8 BO G4 D6 CB 30 51 84 94 
@BD1:04 A4 G3 98 18 69 04 85 FO 
@BD9:03 B9 AD GA AB AD 12 DG 27 
@BE1:29 @3 24 GA 70 67 49 FF AG 
@BE9:39 G6 C6 16 G3 19 G8 C6 BO 
@BF1:95 SE 95 6E A4 G4 CA 88 57 
GBF9:16 AF EB 26 D5 GC A9 2A 7F 
@CB1:AA 4C Al 16 D2 D6 DB DB 23 
GCG9:DE DA G2 F8 G8 F7 G2 FB 34 
GC11:60 G0 G5 G5 G8 @8 A2 BE CD 
6C19:B5 5E DG G5 CA CA 10 FB AB 
@C21:6@ D6 9C 10 F7 AD 64 95 B7 
@C29:9C AO G1 85 FF 85 G2 D6 63 
@C31:6E DG 24 BS SE 95 6E 46 Ol 





6C59:C6 FF 16 D3 CA CA AS G2 E2 


@C61:D0 BA AS 39 DG BA B4 FG A4 
@C69:B9 86 C4 8D 7B GC AD 38 87 
GC71:85 25 BD 90 C4 85 24 AG 7B 
0C79:47 B9 GG 38 91 24 88 16 45 
@C81:F8 B4 DB BY F6 GC 48 B4 27 
@c89:D9 
@C91:5E 68 BS FG 16 G8 68 11 3B 
0C99:24 91 24 BA G9 10 B4 4E 95 
GCAl1:84 22 B4 4F 84 23 B4 CB F2 
GCA9:91 22 60 8A 29 FE AA BS 18 
@CB1:F@ 26 9F GC A4 24 BO EO 09 
OCB9:02 
@CC1:38 GC C9 28 BG G8 C9 16 FF 
@cc9:96 G9 98 4A 90 G5 AD BG 1B 
@CD1:95 5E 38 60 B4 C9 B9 26 BO 
@CD9:C4 95 4E 85 22 BO 48 C4 19 
GCE1:95 4F 85 23 B4 C8 Bl 22 C9 





@CF9:30 GC GC G3 G3 C6 34 DO 4B 
@D91:09 C6 33 4A 85 34 C6 33 1A 
@D69:10 G3 4C 25 GA AS BA C9 ED 
@D11:31 BG 1A A2 O8 BD 42 OD 26 
@D19:9D EF 05 A9 G6 9D EF D9 99 
@D21:CA 16 F2 AD G1 DC C9 ED EA 
@D29:D8 F9 4C 19 BB A2 BO 20 30 
@D31:68 11 A6 31 DG F7 BE 47 76 
9D39:63 A9 15 8D 45 G3 4c 4B D7 
@D41:08 C7 Cl CD C5 20 CF D6 8B 
@D49:C5 D2 AS B7 DG 06 AS BO CE 
@D51:D0 7B 85 BF A2 GC BD EE OF 
@D59:GD 9D EC @5 A9 G6 9D EC DC 
@D61:D9 CA 10 F2 86 GA AS GA FD 
@D69:3@ FC E6 BB AS BB 29 1F G1 
@D71:D0 G9 AS BE 4A G9 16 85 F2 
@D79:BE A5 BB 29 G7 FO G3 4C B4 
@D81:4B G8 A2 GF BD FF BD 9D 2E 
@D89:EA @5 A9 G4 9D EA D9 CA E6 
@p91:1@ F2 86 GA AS BB 4A 4A DC 
@099:4A 09 30 8D FG 05 AS BF AG 
GDAL:FG@ 24 A2 19 BD GF BE 9D 07 
@DA9:36 G6 A9 G2 9D 36 DA CA FB 
@DB1:10 F2 A2 GD BD 29 GE 9D G2 
@DB9:8C G6 AY G6 9D BC DA CA DO 
@DC1:16 F2 £6 BA E6 BA AS GA AG 
@DC9:38 FC 4C 3F G8 AS B7 DO CF 
@DD1:99 AS GA 10 FC 85 B9 E6 BC 
@DD9:3B AY 26 20 98 GF A2 OD 55 
@DE1:86 GA BD Fl OD 9D G8 G4 8B 
@DE9:CA 16 F7 36 E@ CE CF 26 71 
@DF1:D4 C9 CD C5 26 C2 CF CE 79 
@DF9:D5 D3 3D 32 36 2a CC C5 48 
GE01:D6 C5 CC 20 DB 26 C3 CF 34 
GE69:CD D@ CC C5 D4 C5 Cl CC 44 
@E11:CC 20 C5 CE C5 CD D9 26 7A 
@E19:C2 Cl D3 C5 D3 20 C4 C5 4c 
@£21:D3 D4 D2 CF D9 C5 C4 21 44 
@£29:32 26 C5 DB D4 D2 Cl 26 42 
G£31:D3 C8 C9 DB D3 21 DC D4 61 
GE39:FF D8 DA D6 FF DG DE D2 28 
GE41:A5 BB FG 3E C6 3A 16 OF AE 
GE49:A2 18 86 3A E6 4A DG G7 3A 
@E51:85 4A A6 B6 20 52 GA C6 28 
@£59:3E DO 27 C6 EA DG 23 AD A4 
@£61:01 85 EA AS 2F FG G6 AS 06 
GE69:E8 16 62 AY G2 AG 30 FO D4 
@E71:08 G9 GB A6 E9 18 B2 49 1C 
@E79:0C AB FG 69 BE 36 GE 26 85 
GE81:52 









GE91:D5 

GE99:BD O66 DG 75 EB AB DD E2 BE 
@EA1:GE DG G3 CB F6 G2 DD E4 46 
GEA9:GE DG G3 88 D6 G2 98 9D 77 
GEB1:00 DO B4 2F B9 Gl C6 95 BO 
GEB9:EC CA 16 DG A2 GB AS G2 90 
GEC1:FG@ OB B4 7E FG G3 26 18 83 
GEC9:GF CA CA 16 Fl A2 09 AS 4C 
GED1:03 FO GB B4 7D FO 03 26 2E 
GED9:18 GF CA CA 10 Fl 4C AD 5A 
GEE1:11 68 76 F8 BO A2 OB 86 E2 
GEE9:FF BS 7E FG 1F D6 9D 10 Fl 
GEF1:1B A9 62 95 9D 4A 85 FF CO 
GEF9:D6 88 DG G9 BS 7E 95 BB AD 
GFG1:B5 92 26 18 GF E8 C6 FF CD 
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C9 28 BG G6 86 BB 86 96 1641:32 8D 22 32 20 D3 16 AD 7B 
DO 17 AS BS E9 3F AA 12 1649:47 17 91 22 C8 EE 49 16 DD 
27 Bl 22 91 24 88 16 86 1651:D8 03 EE 4A 16 DE 20 17 AC 
£6 23 £6 25 CA DG FO 48 1659:16 ED E8 EG 99 DB ES 86 12 
60 8D E2 GE 60 AD 8B 85 1661:05 A9 G6 85 G3 20 D3 16 £9 
EE CO 13 DG G3 EE Cl 2F 1669:A2 3C AO 03 85 G2 Bl 22 15 
60 G2 43 G1 G1 G3 G2 16 1671:84 B4 48 BA AB 68 91 24 CO = 
A9 33 85 G1 AG GG AZ BA 1679:B1 22 A4 G4 91 24 EB CB 93 
A9 G0 9D GO 38 9D GB EB 1681:C6 62 DB EA BA 38 E9 06 69 
BD 2C 14 9D 10 38 B9 Bl 1689:AA 10 DF C6 G3 DG D6 26 AG 
14 9D 18 38 C8 CA 16 EA 1691:D3 16 A9 15 85 G4 AD G3 46 
BE GO C6 86 G2 AY FF 2C 1699:85 G3 A2 G7 Bl 22 BA 9G CB 
C8 38 £5 62 BG FA 98 GD 16A1:09 48 BD 2c 14 11 24 91 9D 
G0 C6 BD FF D@ 9D FF 28 16A9:24 68 CA 10 Fl E6 22 C6 92 
BD FF CP 9D FF 3D CA EB 16B1:24 C6 63 DO E5 AS 24 18 35 
£2 GE 80 C6 AD 36 85 F2 16B9:69 06 85 24 C6 G4 DB D6 CD 
58 8A £8 8D 86 C4 18 C7 16C1:C6 G5 DY CB AG G2 A2 7E 3A 
G8 9D 86 C4 EB EG 21 68 16C9:18 3E 8G 31 CA 16 FA 88 C9 
P5 60 80 40 20 10 G8 F5 16D1:D0 F4 A4 FF B9 EE 16 85 73 
92 G1 78 A9 14 8D 15 51 16D9:22 BY G7 17 85 23 BO 1F 23 
A9 84 8D 14 63 AD 7F 36 16E1:17 85 24 B9 2E 17 85 25 19 
@D DC A2 1F BE 18 D4 71 16E9:E6 FF AG GG 60 GO GF 47 06 
09 9D F8 D3 BD 64 14 FB 16F1:8B G1 G7 4A 8D CF GC 89 FE 
OF DG CA DB F2 86 G7 39 16F9:00 CO 8G 49 GO 8G CO CO AE 


10F1 
1GE9:DD 66 AG 27 Bl B2 99 GO 33 
1101:04 88 10 F8 E6 B3 69 BD 5D 
1109:FB 16 91 22 C8 DO 02 E6 F5 
1111:23 E8 66 A9 16 85 G2 Ad 1A 
1119:C3 85 23 AG OO 84 22 60 AZ 
1121:A6 31 CA 16 O1 60 A5 63 15 
1129:F@ OF 18 7D EG CO 9D EO 88 
1131:C@ C9 3B FG 2D C9 FB FG 70 
1139:29 AS @2 FO ES 18 7D CO F3 
1141:C@ 9D CB CO AB FO G4 C9 2A 
1149:FF DO G5 49 FF 9D 40 Cl 8D 
1151:C@ 01 DO @5 BD 40 Cl FO EL 
1159:09 CO 68 DB C5 BD 46 Cl BO 
1161:F0 CO 26 68 11 FO BB BC 37 








8 99 E@ CO BY 21 Cl 99 1A 
11A1:26 Cl C8 C9 Cl DB D9 C6 C5 
11A9:69 4C 81 11 A2 G1 86 26 FO 


38 COMPUTE!'s Gazette March 1990 


@F09:10 EE CA CA CA CA 10 D9 6C 6 27 BS G2 18 75 37 AB 65 1459:A9 BF BD G5 D4 AQ FA 8D EC 
@F11:A5 FF 30 45 4C 7E GF 18 EE 9 07 95 22 98 16 GD B4 DA 1461:06 D4 58 69 OO 1B 58 GO EF 
@F19:7D 06 DB 9D G6 DB AB DE G1 2 C8 98 D5 B4 DG 1B BA 89 = 1469:08 
@F21:08 AD 10 DG 1D 74 GF DG 67 6 18 DG 15 CO G8 DG 16 B3 
GF29:0A C9 FF DG G9 AD 10 DO BB 4 B2 DG OC A4 B4 DB OB 77 
GF31:3D 75 GF 8D 10 DO BA 4A 29 4 G2 A9 07 85 22 DB 06 CO 
@F39:B0 12 AD 10 DO 3D 74 GF SE 8 98 95 B2 56 26 CA 10 3D 
GF41:D6 G5 CO G8 FG 14 60 CO FA 9 20 21 11 AG 22 Ad 23 58 
GF49:48 FO GF 69 CG 3C FO G4 BC 5 26 25 27 FG 2C 86 37 04 
OP51:C0 4 38 A6 BS DG 16 BD 8G 9F 

@ FG G9 29 GF C9 G2 BO C9 
@F61:AD 5 E8 DO F2 86 B9 AD 42 EB 
9F69:D8 AD 10 DG 3D 75 OF 8D DS 3 29 10 FG 87 CD 41 63 87 
GF71:10 DG 66 G8 F7 10 EF 20 58 @ G2 E6 BA 8D 41 G3 4c 82 
GF79:DF 40 BF 80 7F A5 3C FO 93 £ GF AD 12 DG C9 50 90 FD 
GF81:10 48 26 27 10 86 3C 20 63 9 86 37 84 38 AG B3 26 FE 
GF89:32 10 68 GA 85 47 20 3A 36 @ C3 86 B3 A2 GE BS SE 69 
GF91:10 AS 3B FG OC AI 30 26 1F @ 1C BA AB AS 26 DG O7 27 
9F99:27 16 26 32 10 C6 3B DO 59 5 02 20 BA GC BO OF CB 72 , 
OFA1:F9 A5 GA 10 36 A9 7F 85 45 5 27 DG @5 AS G3 20 BA AB 
OFA9:@A AG 12 AG B9 FO 1B 46 AF IC BG G3 20 D5 GC CA CA 49 
GFB1:0A 8A 30 GC B9 DD GF 99 3B @ DC AG 31 AGB GO BS BG 9D 
GFB9:GA 64 88 16 F7 84 BS 60 95 @ FG SF 30 5A B9 40 CO GC 
GEC1:A9 20 85 B9 99 GA G4 88 BE 8 E5 B3 C9 16 BO 50 GA 54 
GFC9:10 FA A5 B7 DG 3C AI 99 43 IA GA 69 3F 65 38 9D EG 66 
GFD1:85 45 85 47 20 03 16 90 E6 @ A9 BG 9D 46 Cl BI GO BE 
G£D9:62 84 B7 66 2D CD C9 D3 IF @ 38 £5 B2 C9 28 90 GE 1A 
GFEL:D3 C9 CP CE 20 C3 CF CD co 5 B4 E5 B2 18 79 GG CO FC 
OFE9:DG CC C5 D4 C5 2D Ad G2 EL @ 2D C9 28 BO 29 GA GA 5D 
GFF1:AG 27 99 GO DB 88 DG FA E2 A 3E 40 Cl 69 11 3B 40 C2 
GFF9:98 20 27 16 20 32 16 20 5c 1 65 37 9D CO CO 3E 46 86 
1001:3A 10 20 40 10 A5 BA 8D 64 1 98 9D G0 Cl B9 86 CO 3F 
1009:09 04 A2 G4 BD 1D 16 9D 63 9 CB 9D 20 Cl 99 89 CO 76 
1011:1B 04 BD 22 16 9D GF 94 B2 :C9 Cl DG G2 86 G9 EB CB 6G 
1619:CA 16 Fl 60 C6 D5 C5 cc CC 8 9C 86 31 6B AD 40 85 29 
1021:3A 04 C9 CD C5 3A A2 90 06 3.A9 GG 85 22 AB AA 91 DC 1571:06 2D 10 DB 4c 7D 15 49 C4 
1029:AG 00 85 49 86 47 84 45 7E 2 C8 DO FB £6 23 E8 95 3E 1579:FF GD 10 Dd 8D 16 DG AG EA 
1031:60 A9 3F A2 GG AD O5 DO 5B 9 10 F4 20 BF 13 AB 20 FA 1581:31 A9 FF 85 07 A9 3A DO 2B 
1639:0C A9 44 A2 20 DG G4 Ad 72 F 13 85 23 A9 86 85 FF E7 1589:07 £4 G9 FO 11 BD EG CO AZ 
1041:47 A2 14 AG G3 85 22 86 33 @ BF 13 AA 4A 4A 4A 85 BG 1591:18 ED 12 DG 96 G8 C5 7 C9 
1049:24 2 F@ 5E 8A 29 G7 AA FO 73 1599:B0 G4 86 G6 85 B7 CA 1G 3C 

1 45 FF 30 1F 85 FF 46 86 15A1:E8 A9 14 E6 G7 FG GE A4 58 ; 
1059: 22 F 90 G4 BA 20 4B 13 46 GF 15A9:06 B9 EG CO C4 31 96 G5 7E 
1061:24 88 8A 4A 4A 4A 4A G9 C4 F 90 @9 DO GF 8A 29 G2 78 15B1:E8 86 B7 AI 3A BD 12 DB 6A 
1069:30 91 24 28 88 19 £3 D8 32 6 04 FO 05 PG G6 BA 4A GE 15B9:4c 81 EA A9 G8 BD 16 DB DS 
1071:C8 Bl 24 38 E9 30 DO G4 20 A 2@ 42 13 BD C9 13 91 B2 15C1:A9 1B 8D 11 DG AG GB BC DF 
1079:91 24 FO F4 CO G4 60 A2 52 2 8A 85 FE 20 4B 13.C4 C4 15C9:05 DB BC G3 DG A2 BO AS 24 , 
1081:09 B9 8D 10 9D GE D4 88 9E 4 90 92 84 B4 4A 90 OB 51 15D1:32 FG 10 E6 32 C9 FB DG 3D 
1089:CA 10 F6 60 FO G1 GG 05 88 @ 42 13 AS 23 C5 BS 98 EG 15D9:09 CB BC G1 D4 AY 4G 8D B7 
1691:41 06 FG G0 9F F5 FO G2 29 2 85 B5 C6 G2 DO DD FO E4 1581:00 D4 E8 8E 04 D4 C6 GA 52 
1099:00 65 81 G0 40 00 OF Fl 5E 7 DO G4 E6 23 E6 23 C6 20 15E9:Dd 95 AD 84 85 BA DG SF ES 
10A1:86 44 86 42 85 43 AS D2 6A 3 60 4A BO G2 CB C8 88 BA 15F1:A5 37 G5 BD 8D 16 DB AS 45 
1GA9:AG 22 8C GC D4 BD OD D4 CO @ 8A A6 B3 9D 86 CO 98 63 15F9:38 18 69 13 29 17 8D 11 76 
10B1:A9 11 8D OB D4 69 20 14 C9 1D 88 CB AS 23 9D 46. CO 91 1601:D0 AS 35 FO 23 C6 36 DO 26 
10B9:11 A2 66 26 68 11 EG OC SE 9 66 9D 81 CO E6 B3 4C 7D 1609:1F AY G5 85 36 C6 35 DB 30 
10C1:D@ F9 C6 G2 DO F3 24 G8 60 9 12 C6 G2 DB G3 4C DC GA 1611:05 AG G9 26 75 11 AS G8 CF 
10C9:11 20 14 11 A2 G3 18 26 7F 2 A5 B5 18 65 B4 GA 4A SF 1619:49 G1 8D OB D4 85 GB 29 82 
16D1:F0 FF A2 00 AG G5 AS D1 F4 D 4A 03 4A 4A 4A 4A 69 77 1621:01 GA 4D 15 DG 8D 15 DB B3 
1009:9D 26 C4 20 GB 11 CA AS 43 6 85 BB A2 AG AI CB ID AG 1629:60 AY GG 85 FF 26 D3 16 86 
10E1:D2 0 03 EB DG FA 86 22 AY 7A 1631:A2 10 91 22 CB DG FB EG GF 
109 0 85 23 85 25 AS B4 85 A4 1639:23 CA DO F6 AY 30 8D 1F 7B 

4 

4 

6 

9 

9 

) 

3 

8 

7 

8 

IC 

8 

8 
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9 
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1701: 40 G6 CO 8G 40 30 30 21 1991:1¢ 1E 4C 1A 1c @4 4C 1E 2C 
Reagan 30 31 34 34 34 34 35 D4 1999:GC G1 14 G4 1C 1E IC 1A 80 
1711:30 31 34 34 34 34 30 30 70 19Al:1C 1A @C 64 2C 1E 64 04 DO 
1719:35 35 35 35 34 34 34 16 1A 19A9:64 G8 G6 57 GE 6C BA 2D Ad 
1721:2D 2D 19 2B 2A 24 1F 22 49 
1729:C@ 37 3D 86 C3 @@ 82 C2 1B 
1731342 82 C2 G2 42 82 C2 30 6B 
1739:31 35 35 35 36 31 31 36 56 
1741336 36 37 37 37 37 03 30 3F 
1749:00 80 G1 98 G6 GB BG BO 21 
1751:18 @@ G1 80 00 GG 30 GO 14 
1759:00 G1 86 9G CO 3C GG GO CE 18A1:60 16 06 16 24 17 16 34 87 
1761:C3 88 G6 C3 G8 G8 C3 GO 35 18A9:16 12 OB @3 2B 14 12 16 DE 
1769:00 C3 G0 G3 C3 CO 63 C3 A} 18B1:@C @1 GC 12 2B G3 GB 37 7D 
1771:C@ 03 FF CO GO FF 88 00 CC 18B9:9D @5 GD 13 25 17 10 @@ 2A 
1779:00 00 G0 82 06 GG 82 G8 D4 18C1:69 66 24 26 44 22 62 22 F7 
1781:00 82 00 60 82 BG OO 82 E6 18C9:14 G1 14 26 62 23 42 44 91 
1789:90 00 AA 60 OF FC FO OO 61 18D1:64 44 46 27 26 06 26 52 38 
1791:07 98 GG G3 GC OG G1 98 94 18D9:G2 12 64 46 24 26 64 G1 04 
1799:08 18£1:14 64 74 42 @8 50 SB 46 4E 
18£9:64 22 35 @5 35 23 45 10 9C 
17A9:00 18F1:06 5C C4 GA GD G5 15 GB 24 
17B1:00 00 36 GG GG 30 G6 GB AG «18F9:1D 13 12 Ic @l 4C 64 14 DE 
17B9:30 7E G0 G0 66 GO GO 66 39 1901:0F 1B OF 25 GE 4C 12 64 AG 
17C1:00 03 FF CO 66 00 60 OC BI 1999:16 1C GE 96 16 2C 16 1c 19 
1709:06 30 18 68 18 30 68 OC 94 1911:1A 6B 17 2B GA G2 1A 26 5B 
17D1:60 G8 G6 10 GO GO 38 GB 62 1919:GA 1B 1C 64 24 1F BE 22 B6 
17D9:00 6C G6 0 C6 GB GB C6 26 1921:36 G8 2C SB 34 GF 25 OB DE 
17£1:00 G1 83 G@ G1 83 GG G3 D9 1929:08 4C 55 GE 32 GB 27:07 «11 
17£9:@1 86 G3 G1 80 G6 GG CO G6 1931217 10 OG 5A EC 42 G2 42 4F 1A79:32 1D @F 67 17 1D 1B 32 FS 
17F1:06 98 CO GC BB 68 GC 7C 12 1939:6B @3 1B 82 A3 63 63 22 7F 1A81:34 1E 6C @1 2C 1E 1A O62 FB 
17F9:60 G6 C6 CG G3 83 8G G3 ES 1941:G2 62 54 G1 14 G4 EC F4 27 1A89:1A 33 1D 33 65 37 1E 1F Dl 
1801:06 60 GF GG GG 19 86 GO 78 1949:04 14 G1 54 C6 17 67 3F C7 1A91:07 1F 1D 33 32 62 4A 7C 92 
1849:31 80 G6 61 86 OO Cl 86 10 1951:07 3F C6 06 46 GF 67 7F GC 1A99:4E 2C 64 24 36 66 66 37 90 
1811:03 81 86 06 G1 86 GC GB BS 1959:36 1AA1:36 
1819:C@ GC G6 CB BC BG CB BC AG 
1821:E0 CO G7 19 80 BO GF BB 86 1969:03 
1829:00 66 93 EG GG BE 6G BB 42 1971:0D 05 ED 4D 65 4D F5 @5 4C 1AB9:6B 
1831:78 60 063 CO 60 GE BG CO LE 1979:0D 47 P6 G6 16 6F 87 1F DE 1AC1:3D 7E @8 53 63 @C 1A 33 1D 
1839:0C @8 Cd GC G8 CG GC Gl 64 1981:76 96 16 47 46 10 G8 5D 77 1AC9:03 1B 32 1D 1B 47 6E 18 49 
1841:80 GF 81 86 GG El 86 GO 36 1989:32 1E 1A GC Gl 14 36 1A 3F 6 
Z aS . Data acquisition and control interfaces 
6” Mak C C64 & C128 
oe e your Commodore 


a Speed Deron 


TURBO MASTER CPU™ 
4.09 MHz Accelerator Cartridge for C64 


« Four times faster processing speed combined with five 


times faster disk Load and Save. 


* Software actually runs four times as fast. Basic, word- 
processor scrolling and search, spreadsheets, 
assemblers, graphics, GEOS etc. Compatible with most 


software. 


* Jiffy DOS compatibility option available (by Creative 


Micro Designs). 


Why upgrade when you can enjoy dazzling performance 


from your C64 now? 
* Only $199. Shipping Included 


80-line Simplified Digital /O Board 
with ROM cartridge socket 
Model SS100 Plus $139. Additional $129, 





Original Ultimate, Interface 
Universally applicable dual 6522 versatile interface adapter board. 
Model 641F22 $169. Additional $149. 
16-Channel, 8-bit analog-to-digital conversion module. 
Requires model 641F22, Model 641F/ADC0816 $69. 

Interface boards include extensive documentation and program 
disk. Manuals available separately for examination. Call or write 
for detailed brochure. 


Resources for Serious Programmers 


O Sane Master Multi-Pass Symbolic Disassembler. C64 & C128, $49.95 
* PTD6510 super-powerful Symbolic Debugger. C64, $49.95 

* MAE64 650; 12 Macro Editor /Assembler. $29.95. 

* C64 Source Code Book. Kernal and Basic ROMs. $29.95 











SCHNEDLER SYSTEMS 


Dept. G 3, 25 Eastwood Road, P.O. Box 5964 
Asheville, North Carolina 28813 Telephone: (704) 274-4646 


“We engineer miracles." 


VISA and Mastercard accepted. 
All prices include shipping 
prepaid to US addresses. 
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BAiWALL 


P.O, Box 129/58 Noble Street 
Kutztown, PA 19530 






Hour FAX L 


Customer Service I+ 
Technical Support 1 


ACCESSORIES: 


Apro Extender 64 User Ribbon $19 
Aprospan 4 Slot Canridge Holder 25 





Covers all 
Final Cartridge V3 ny 
Teontrolier 16 
Joysticks all 
LLeroy's Cheatsheet 6 each 3 
Leroy's Cheatsheet 28 each 7 
Lightpen- Model 170¢ 


Lightpen-Model 18 
Mach 128 Cartridge 
Minimodem C (1200 aud) 
Minimodem ( 2400 Baud 
Monitor Cable C128 4080 Switch 18 
Monitor Cable C128 Mono Video. 6 
Mouse 1351 Commalore COUCI2S 40 








Mouse M3151 subtitle) ” 
Paper all 
Passport Midi Interface 64/128 98 
Power Supply »C128-Repairable $5 
Printer Intfoe G:Whr 29 


Printer Intfce Super Giraphic Senior $9 
Printer Intfce Super Graphic GOLD 89 


Printer Intfce Super Graphic Jr, 42 
Quick Brown Bax 64K. 10s 
(QBI 64K upgrade (makes 128K) 115 
RAM Expander 1750. 9 
RAM Expander 1764 (for C64) 138 
RS232 Delure lnertace ) 
Ribbons all 


Ribbon Renew + Restnk wino Equip $ 
Safeskin Keyboard Protector C128 19) 
Safeskin Keyboard Protector C6416 


Serial Cable» Serial 6 Foot 6 

Serial to Serial Cable = 12 feet 5 

Video RAM 64K Cartridge (FULL) $0 

Warprpecd 128/64 % 

Zoomer Console Controller 6 
HOOKS 


S41 Repalr & Maint Handbook $16 
1541 Troubleshoot & Repair Guide 17 





1571 Internals 1 
Anatomy of Cte 7 
‘Anatomy of the 1541+ 7 
C128 Internals 7 
C128 Programmer's Ref Guide 20 
C128 Tip & Tri 7 
C128 Troubleshooting & Repair 17 
C64 Tips & Tricks 7 
‘C64 Troubleshoot & Repair Guide 17 
CPM User's Guide 7 





SM Prog Protection Manual 1 24 
CSM Prog Protection Manual 2 29 
GEOS - How Get Most Book&Disk 9 


GEOS inside & Out 0 
GEOS Programmer’sRef Guide 17 
GEOS Tips & Trike 1s 
K Jax Book Revealed 3 a 
Jax Book Revealed | 23 
{Lou Surilers Thicks & Tips 16 
Machine Language 64+ uv 
Superbase The Hook 64/128 13 


Twin Cites 128 Compendium #1 15 
‘means that adiskis availble call 


GENERAL BUSINESS) 


CMS Accounting/128 129 
CMS Inventory Module 128 33 
Fleet System 4 2 
Foatmaster 124 w/Speller 0 
Fontmaster 1V64 -:) 
KFS Accountant 124 109 
Leroy's Label Maker u 
Microlawyer 9 
Paperclip 3 7) 
Paperlip Publisher 9 
Personal Portfolio Manager64 29 
Pocket Filer 2 » 
Pocket Planner 2 » 
Pocket Superpak 2 (Digital) a 
Pocket Writer 2 9 
Pocket Writer 3 6 
Superbase 128 Version 3 ) 
Superbase 64 » 


Superhase/Superscripfbook 128 pak 69 
SuperbuseSupersriptBook 64 pak $9 
Superscript 128 2 


Swiftax 64-Income Tax Prep 37 


Swificale 64 w/Sideways 7 
Technical Analysis Syslem 64 29 
Visistar 128 » 
Viziwrite 128 4s 


Wordpro 128 w/SpelleriFlepro 0 
Wordpro 6 w/Speller& Turbo Lond 30) 


Wondwritce 4 for C54 » 
Write Staff 128 winpelicbecker 27 
Write Staff 4 whpelichecker 22 
Write Staff BasossLzgl Templates 10 
Write Swif'spell checker only 10 
EDUCATION 
Alphabet Zoo sik 
Big Bins Special Delivery 9 
Calculus by Numeric Methads 27 
Counting Parase 6 
Desipnasaares » 
Easy Sign 7 
Enmie’s Big Splash 9 
Emie’s Magic Shapes 5 
Evelyn Wood Dynamic Reader 17 
Grandma's House/st 6 
Groyer's Animal Adventure 9 
Jangle Book (Reading 2) 9 
Kids on Keys Is 
Kidwritert 2 
Kindercomptss is 
Lear The Alphabet 6 
Linkword German " 
Linkword:French 9 
LinkwordFrench 2 9 
Linkword:Spanish 9 
Math (First Men on Moon) 9 
Muthbusters68 6 
Mavis Beacon Teaches Typing (O54 30 
Mental Blocks 10 
Morse Code Trainer s 
‘Numbers Show (The) 0 
Peter & Wolf Musici64 9 
Peter Rabbit (Reading 1) 0 
Rocky's Boots Pt) 
SAT Complete (Hayden SAT Prep) 26 
Sky Travel 3 
Stickybear ABC'S n 
‘Suckybear Numbers n 
Stickybear Reading Comprehension 27 
Stickybear Typing. a 


Where in Europe Carmen Sandiego 27 
Where in USA is Carmen Supsiego 27 
‘Where in World Carmen Sandiego 28 
Widhaen Classics - Below the Root 12 
Widhaen Classics - Swiss Fam Robi 12 
Widham Classics Treasure Island 12 
Widham Classics Wizard of OZ 12 


ENTERTAINMENT 
1983: Batl of Midway $20 
ADAD-Herves of the Lance 22 
DAD - Poo! of Radiance 7 
‘MAD - Cure ofthe Azure Bonds 27 
‘After Burner B 
AI R 
Arvade Mega Hits 
‘Awnie Games 
Bal 
Ballistix 
Batman «The Movie 
Battle Chess 
Batiletech 
Beyond Dark Castle 
Beyond the Black Hole 
Blog Angels 
‘C128 $0 Col Fun & Games Pack 
C64 Games Spectacular Package 
(California Raisins 
‘Caveman Ugh*iympicx 
heamaster 2100 


SBBSUBEBN EE 


B 





Waiting for a new release? 
Why not pre-order it! We'll take 
your order now, and ship the 
product as soon as we receive it 


You can even call us Toll-Free 10 








check on the status! 





PORS OSS UC cas 


CRAP a 


1-800-638-5757 


Outside the USA (1-215-683-5433) 


EYE OF HORUS, 


‘This arcade game set in ancient 
Egypt puts the player in the role of 
Honus, son of King Osiris. 

King Osiris" body was scattered in 
seven pieces by the evil god Set. 
Horus must locate the seven pieces, 
return them to the burial chamber, 
and restrict them there, 


Ina maze beneath the Sahara, 
hieroglyphs emerge to guard 
passageways. Gods transform into 
serpents and dragons. You must 
search for magic keys, and for the 
sacred amulets that you will need 
10 confront Set. 


Briwall Price - $20 

















‘Chutes and Landers ry 
(Clue: Master Detective 2 
Death Bringer rT 
Double Dragon 2 
‘Double Dragon It B 
‘Dr. Doom’ Revenge 2 
Dragon Wars » 
Eye Of Horus, 0 
P14 Tom Cat z 
Face Of 20 
Gauntlet 2 20 
Heat Wave: Offshore Racing* 20 
Hole In One « Miniature Golf 20 
Tron Lord n 
Jack Nicklaus Course Champ "891 
Jock Nicklaus’ Course Intern 1 
Jeopardy 2 D 
John Madden Football, a 
King of the Heach Volleyball 32 
Knights of Legend rt) 
Licence to Kill, 

Maniac Mansion 

Mean Streets 

Monday Night Football 
Mooopoly 

Neuromancer 

Omega 

Operation Wolf 

Out Run 

Pipe Dream 








Sentinel Worlds 
Sex Visens From Space 

Sim City 

Sinbad: Throne ofthe Falcon 
Skate or Die 

Soow Sts 

Sports Clection (4 games) 
Starfight 

Super Pasywond 

Superman 

TY Sports Football 
Terrxpods 

Tes Drive 2: California Challenge 10 
Test Drive 2: European Challenge 10 
Test Drive 2: Muscle Cars 10 
Test Drive 2 Soper Car 10 
Test Drive 2: The Deel 9 
The Cycles: Grand Prix Racing 20 
Thave Stooges 2 
Thud Ridge 4 
Tom & Jerry 6 
Ui Telogy (12.3) 

Ubi V 

War in Midie Bath 
Wheel of Fortune 2 














Windwatker 
Wizardry Trilogy % 
Zach Macrakin 2s 
Zoom is 











WHY CHOOSE BRIWALL? 


“No Surcharge on Charge Orders 
¥24-Hour Toll-Free Ordering 

¥ Our Fifth Year in Business 
Fast, Friendly, Reliable Service 
In-house Technical Support 

A Fair Return/Exchange Polic’ 
¥A"No-surprises” Shipping Policy 





YOUR SATISFACTION 
IS GUARANTEED! 





GEOS RELATED: PERSONAL 





Desk Pak Plat « Geos $22, | Bible Search $20 
FoniPak Phos -GEOS 22 | Bridge 50 20 
GEOS 64 ¥20 39] Dream Machine Analyzei64 
Geoxharoa 22 | Family Tree C64C128 and LDS 39 
Geofile 128 45° | Grea War is 
Geopublsh 6 39 | Heanlab 49 
Geos 124 V2.0 45. | Rocipe Filer i 

Tarot 128 1s 


CREATIVITY GRAPHICS, 
Award Maker Plus 3 UTILITIES LANGUAGES 











Award Ware 12. | 1SH/S71 Deve Alignment 335 
Billboard Maker 25 | 1581 Tootkit ¥2/ Dos Ref » 
Blazzing Paddles 25 | Buick 29 
Business Card Maker 29 | Basic Toolkit 7 
Cad 3D 39 | Basic B-How to Get the Most Out of 17 
Cadpak 128 39 | Basle RTootkivflook Packuge 45 
Cadpak 64 29 | Basic Compile/128 on) 
Colores 128 12 | Basic Compilers » 
Computer Eyes 105. | Big Blue Reader V3 (64/128) R 
Doodle 29. | Bobsterm Pro 12 2 
Graphics Galleria Pa 1 24 | C128 Advanced User Package 45 
ome Designer 45 | C128 Programmer's Delight 48 
Howe Designer Circuit Symbol Lib 10 | CP/M Kit 2 
Jeon Factory 25 | CSM Newsletter Compemdinm — 29 
Label Wizard 21 | Cobol 128 a9 
Newimaker 128 24 | Digitaher 128 a0 
Newsroom 14 | Goome Kit 64/12 29 
Newsroom Clip Ant 13. | Kracker Jax Super Cat 2 
Proto Finish 19 | Kricker Jax Vol 1-7 + Shotgun? 27 
Poster Maker 128 24 | Maverick V40 Copier x 
Prinimaster-Fantary AntGallery 15] Merlin 128 4s 
Prntmasier Gallery 1 15 | Physical Exam 1581/1571 x» 
Prinamaster Gallery 15. | Protoline BBS 128 29 
riotmaster Play 25. | Prototem 124 2 
Printsbop 30. |} Super 64 Librarian it) 
Printshop Art Library #1 18 | Super 81 Uilities 128 or 64 each 29 
Printshop Companion 27 | Super Aide 64 2s 
Pritshop Holiday Edition 19 | Super 128 4 
Screen FIX 25__| Super Disk Liberian for C128 19 
Sketchpad 128 24 | Super Disk Utities 128 Fr) 
Spectrum 128 29. | Soper Pascal 128 or 64 cach 4s 
Video Title Shop w/GrComp! 15. | Super Snapshot V5.0 9 

Super Snapshot V5.0 w/I28 disble 65 

SysRES Enhanced 16 





We maintain an enormous inventory of software. 
If you don’t see what you want, CALL! 


Titles marked with * were not yet available when 
the ad was prepared. Please call for firm price and 
availablilty. Titles in BOLD are new items 


Australian Customers can order locally from 
Briwall Australia at: 
(062) 88 0131, or FAX (062) 88 0337 


Circle Reader Service Number 123, 
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CAE 


1-800-638-5757 


Outside the USA (1-215-683-5433) 
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BAiWALL 






P.O, Box 129/58 Noble Street 
Kutztown, PA 19530 


ASE COME VISIT US! 
Friday 94M-6PM EST 
Saturday 94M-12 Noon EST 


WHERE CAN YOU FIND PROGRAMS MADE JUST FOR YOUR 128? 
CHECK US OUT! WE HAVE WHAT YOU NEED! 


For Desktop Publishing? Try 


NEWS MAKER 128 


Desktop publishing forthe 128D (or the 128 with 6K video 
RAM upgrade), News Maker 128 can be used to create profes- 
sional looking newsletters, reports, signs and posters, It can be 
used as a stand-alone program or in combination with word 
processing or graphics software. It uses standard sequential files 
for "pouring text into user-defined columns, Full page layout, 
pop-down menus, smooth screen scrolling, font selection, 2 
note pad, freehand drawing, pixel edit, REU support, and a 
sideways printing utility are among the many features available. 


ONLY $24 


Graphics? Try 


SKETCHPAD 128 

Complete drawing system for the Commodore 128 and 1351 
mouse. Sketchpad takes advantage of the 80 column graphics of 
the 128, A 640X200 drawing screen, smooth freehand drawing, 
Wide selection of brushes and many fonts are provided, 

JUST S24 


SPECTRUM 128 

If you have a 128D (or 128 with 64K video RAM upgrade) you 
can take full advantage of this 80-column paint package with 
128 colors! Menu operated. Mouse required. Features include 
airbrush, mirror, multi-color, block ils, pixel edit, color edit, 
fonts, and a slideshow maker 





The Ultimate CAD Package? Try 


HOME DESIGNER 128 

Given glowing reviews by every major Commodore magazine, 
this CAD system out-classes every other CAD program because 
of its object oriented design, With over $0 powerful commands, 
S layers, superb support of library figures and laser-quality 
printouts at ANY scate on your dot matrix printer or plotter, you 
can ereate drawings so accurate that a blueprint can be made 
from them 


Tired of working with poor quality/inaccurate printouts, manip- 
lating litle dots on a bit-map, giving up on detailed work be- 
‘cause you can't zoom in close enough? Join the professionals! 


OUR PRICE ONLY $45 





THREE 
COMMODORE 
128 PACKAGES 


#1) 80-Column Fun-N-Games - 


#2) Programmer’s Delight 





Ve've assembled three packages of 
Commodore 128 specific software 
‘at great savings, These packages 
contain more 128 software than you 
probably thought was available 


YOUR CHOICE 
$45 


1541/1571 DRIVE ALIGNMENT 


‘This excellent alignment program is a must-have for every 
‘Commodore owner. Easy to use, it helps you to align your 
dive so that it runs just as if it were new! The simple 
instructional manual and on-screen help prompt you through 
the alignment procedure and help you adjust the speed and 
head stop of your drives. It even includes instructions on how 


to load the alignment program when nothing else will load! 


Dont be caught short! We get more Red Label orders for this 
‘program than any other program we sell. Save yourself the 
expense! Order now, keep it in your library, and use it often! 


Works on the 64, 128 and SX64 for the 1541, 1571, 1541-11 
‘nd compatible third party drives 
STILL ONLY $25 








BASIC 8 Package 


Now get an entire Basic 8 programming libeary fr the price of 
an average piece of software! 


The Basic 8 package includes: Baste 8, the powerful 80-column 
graphics programming system for the Commodore 128, adding 
lover $0 commands to standard BASIC 7,0, and including Basic 
Paint, Basic Write and Basic Cale; Basi 8 Toolkit, a point-and- 
click operating system tht allows you to create custom pointers, 
fonts, pater and icons; and How To Get The Most Out Of 
Basic 8, a book and disk combination that provides dozens of 
examples, two fll disks of demos and a 3D animation system. 


The list price of the individual pieces is $79.95 


OUR PACKAGE PRICE $45! 





ve programs designed specifically for the 128 80-column mode! 
‘Try to make $100,000 with Wheel & Deal, play a talking puzzle with Digitalker 128, determine your destiny with Tarot 128, test your ESP abilities with 
ESP Tester, and improve your memory skills with Memory Academy 128, 


ive 128 programs that will bring out the programmer in you, 
‘You get Gnomespeed, 2 128 BASIC compiler, Colores, to convert 40-column graphics to 80-column, Digitalker 128, for adding digitized voice o your 
programs, Super Disk Librarian, for cataloging all of your disks, and Super Disk Utilities, forall your fle handling and disk editing needs, 


#3) Advanced User - Five 128 programs to get the most out of your 128 system and peripherals. 
You get Prototerm, a terminal package, Protoline BBS, a BBS package, Digitalker, for adding digitized voice to your 128 programs, Super 81 Utilities, 
4 disk editing and file tility package specifically forthe 1581, and Colorez, the 40 to 80 column conversion program: 


Games Spectacular Package 


Whether you are new to Commodore computers, or just 
looking to expand your software library, you can't afford to 
miss this deal! 


You get a total of 10 games for less than the price of many 
single tiles! This package includes: Galactic Frontier, a 
graphic, space exploration game where your mission is to, 
find new life forms; Torchbearer, a role-playing, graphic 
dventure game; Revenge of the Moon Goddess, a 
collection of four adventure games; and Eye of the Inca a 
second collection of four adventure games, 


Ten games in all, with a total suggested list price of $90, 


OUR PACKAGE PRICE $21! 





‘SIPPING POLICY’ ALL ORDERS tecvediefoe HAL EST wi mrmaly b duppe wiv 2 Pushes day. Al1UPSsipnens 
‘oe tent Sgntare Ret No Dies Release Add e fotiowing wigping charge to yout Teta wttare der 


"ACCEPTED PAYMENT METHODS: We pay accep Poranal Check (ro bling, Maney Oner, VISA. MASTERCARD, School 
chase Onder, COD ($4.00 aon fer eatin Ball Coster ONLY) Al checks mtb US Dolan a rae on 


UPS: Ground $4.50 (cot USA ONLY Alun $4 clades Parts Rica Overnight $1200 + $3 $0 PER ITEM (mest be 
srceied by 12 Nam Priority Mall USA $40 (lnctades APOPO? Canta Manic $70, Osher Ferg $40 Handing + Ace 
Shoppes lnsrace 


HARDWARE: Shipping chur for antares 450 Maing + cal ppg cages + marae 


ORDERING INSTRUCTIONS: For yur convenience. you cn place a pboe or 34 HOURS DAYS A WEEK ow cue 
TOLL-FREE LINE |-40043457S7, Ou be USA, pase wt (715) 843303. Fre aay company checks ae sho 
welcome on oe ore tin, Monin Uv ray, 0AM 4:30PM EST, AFTER HOURS Onder Only Pins’ When linge ode 
Pleme wpe) your compu model, ame & atone elepowe ruber. shepig ara, hac met ena it 
faye of a 


2 US tank Thr mo srchare foc ar and your etd ot hared wl we sip! 


RETURN POLICY (lor software and accemeris ONLY) We ves tera ret poly to beter service your end W win 1S 
ays fom he ne you cere a tem. You a fied we foray Yeu. you ay ear ofr eet eeu. exchange, 
x open cro REFUNDS ARE SUBJECT TO A 10 KESTOCKING FEE PER ITEM RETURNED (8.00 MINIMUM FER ITEM) 





EXCHANGESOPEN CREDITS wil pady be had a fe fl puchave pice of ie ee DEFECTIVE tr, Marware em 
Special Oder tema wil te rpc! placed wh be me ly 


TECHNICAL SUPPORT Cat (215) 60-269, Monday «Friday, Yum - Spa EST. 
‘Wes cat very Best ip you with your prc selects efore yo ere and afi ou eve your pra, ne oes, 
‘ech an pice, composi. wl be had you der a i Une You place our oder BUT. you have speci, deal 
Gorse bat a frat yor wil gt mt ep fm our Tet Supt Line 


Future 
Computing 
Neural Networks 


Part 3 
Kevin E. Martin 


In the final installment, the author presents the competitive learning model 
and a program to go with it. 


ompetitive learning (CL) is the focus of most of 

today’s neural-network research. After you 

read about how the algorithm works, you 

can experiment with the program at the end 

of the article, The program implements the 
competitive-learning algorithm with a complete interface 
to BASIC. 

In February, I discussed the back-propagation algo- 
rithm. It is in the associator class of neural-network 
models, but it was not developed from evidence from 
neurophysiology or even from psychology, The CL model 
is a much more biologically plausible model, and it exhib- 
its many of the features we find in our own brain, 

Competitive learning belongs to the class of self- 
organizing neural networks, These models take the salient 
features of the input domain and organize themselves so 
as to internally represent these features. Because they de- 
tect the features of the input domain, they can learn how 
to statistically classify the domain into several categories. 
This is especially useful when the network has to learn 
how to recognize damaged or distorted objects or patterns. 

Like back propagation, competitive learning has layers 
of PEs (Processing Elements) and connections between the 
layers, but the similarities stop there. Each of the layers in 
the CL networks are broken up into groups of PEs where 
no PE can belong to more than one group. All of the PEs 
in these groups receive their input from the previous. layer, 
and then they compete to see who gets to output from 
their group. Only one PE can output its signal from its 
group. 

There is no teacher vector in CL, because the network 
organizes itself into recognizing the features of the input 
domain, This is quite a bit more like our own brain, since 
the vast majority of the cells in our own brain have no 
connection directly to the outside world and therefore do 
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not receive any teacher input. We can adapt to almost any 

type of environment, and the CL neural network is leading 
us toward developing a neural-network model that actual- 

ly can adapt itself to any environment. 

Another feature different from the previous networks 
we have seen is that we have connections not only be- 
tween layers, but also within a layer. These intralayer con- 
nections are only between PEs within the same group, and 
they are inhibitory. So, if one PE gets a stronger input sig- 
nal from the previous layer, it will inhibit its neighbors. In 
doing so, it becomes stronger and is said to be “winning 
the competition.” Then, after a winner is determined, it 
outputs its signal to the next layer, The connections be- 
tween layers are all excitatory, which will cause another 
competition to occur in the next layer. 

The learning algorithm is very simple. All the weights 
in the connection matrix which lead from all the cells in 
the previous layer to a single cell in the current layer (that 
is, a row in the connection matrix) must sum to 1, This 
keeps the weights evenly distributed, and no PE in the 
group will get too strong. When a PE in a group wins a 
competition, it gets to learn, and the weights are changed 
according to a mathematical learning rule. Since all the 
weights must sum to 1, when a PE learns, the weight for 
connection between the current PE and the active PEs in 
the previous layer becomes stronger, and the weight for 
connection between the current PE the inactive PEs be- 
comes weaker. This causes the PE that won the competi- 
tion to become more likely to recognize the pattern when 
it appears again. 

Although competitive-learning neural networks are 
more like the brain in many respects, they still have sever- 
al limitations. First, each of the clusters should learn differ- 
ent patterns, but in this scheme, there are no provisions 
which keep them from learning the same patterns. If two 


clusters’ weights are similar, they will tend to learn the 
same pattern, A simple fix for this problem is to have each 
of the clusters repel each other (that is, to have inhibitory 
connections between the clusters). 

The linear-associator and back-propagation neural net- 
works were able to associate two different patterns. This is 
a very important type of learning. The competitive-learning, 
neural network can’t learn to associate two patterns, but if 
it were combined with another network scheme, such as 
back propagation, then we would have a very powerful 
network architecture able to classify patterns and associate 
these classifications as well as the patterns themselves. 

Since the size of the competitive-learning networks 
are limited to a certain number of clusters, they can classi- 
fy the inputs into a limited number of categories. This lim- 
itation does not become apparent until the number of 
natural classifications of the inputs exceeds the number of 
clusters the CL network contains. In this situation, the net- 
work will classify the extra classes into categories in which 
they do not belong. This can be solved by simply adding 
more PEs and more clusters in the layers. 

The largest problem, and the most difficult to solve, is 
the problem of stability. The CL network should, after a 
certain amount of time, stabilize each of its weights to a 
final value. After this, the weight change from subsequent 
training should not move the weights. But the weights in a 
CL network significantly change even after a long period 
of training. This problem has been solved by another neu- 
ral network, Adaptive Resonance Theory (ART). For a dis- 
cussion of ART, see Neural Computing: Theory and Practice, 
by Philip Wasserman. 

The field of neural computing has grown rapidly since 
its rebirth in 1982, but there is still much more research to 
be done. Over the next several years, many new neural- 
network architectures will be developed and implemented. 
The applications will become wider and wider, but we are 
still a very long way from the day when every home has a 
computer to talk to. 


Hands On 

The accompanying program performs graph partitioning. It 
takes inputs and classifies them into two distinct groups 
(one for each PE in the second layer). The first layer of 
PEs is arranged in a grid shape shown in Figure 1. The in- 
puts are dipoles; that is, only two PEs in the input pattern 
are allowed to be 1, and the rest are set to 0. In order to 
determine the correct classifications, there must be some 
order to the input patterns. To accomplish this, we limit 
the inputs to dipoles which are adjacent to each other 
along a horizontal or vertical line of the grid. As shown in 
Figure 1, only two PEs are active (blackened) and the rest 
are inactive (open), There are 24 possible dipole inputs, 
and each of these must be presented during a training run. 





Figure 1: Graph Partitioning 


oO; O2 O3 O, 
Os e oO, Os, 
Og er On O12 
O13 Or O15 O18 





What's startling about this example is that the pro- 
gram classifies the inputs into two distinct groups without 
any teacher, The groups are equally distributed; that is, 
they accept approximately equal numbers of patterns, 
They are also divided into very logical halves, If we were 
asked to divide the grid shown in Figure 1 into two dis- 
tinct, equally distributed groups, we would most likely di- 
vide them between the second and third columns or 
between the second and third rows. This is exactly what 
the graph-partitioning example does. It divides the graph 
(the grid) into two halves horizontally or vertically and 
sometimes (though not very often) along the diagonal. 

The competitive-learning example program is divided 
into two parts. The majority of the work is performed by 
the machine language routines. To type these in, you'll 
need MLX, the machine language entry program found 
elsewhere in this issue. The MLX prompts, and the values 
you should enter, are as follows: 


Starting address: C000 
Ending address: C98F 


Once you've finished entering the data, save a copy of the 
routines to disk with the name CL.ML. The BASIC pro- 
gram expects to find a file with this name. 

The graph-partitioning program is written in BASIC; it 
calls the machine language routines. To avoid typing 
errors, you should use The Automatic Proofreader, also 
found in this issue, while entering it. Save a copy of the 
program to the same disk that contains CL.ML. 

The CL example program, Dipole, is very simple. In 
line 40, I initialize the random-number generator. The CL 
network is initialized by calling the machine language rou- 
tine at 49152 with the following parameters: the number 
of PEs in the first layer, the number of PEs in the second 
layer, the number of patterns to learn, and the learning 
rate. An example of this is shown in line 60 of the ex- 
ample program. 

This initialization sets up all the variables used by the 
program. These variables are standard BASIC variables 
and arrays and are described in the following table. 


Variable Meaning 

pl Number of PEs in layer 1 

p2 Number of PEs in layer 2 

np Number of patterns for the system to learn 
rate Learning rate 

Array (Size) Meaning 

02(p2) Output from layer 2 

w1(p2,p1) Connection weights between layers 1 and 2 
in(p1,np) Input patterns 


Remember that these variables and arrays are erased if 
you perform a NEW or CLEAR command, load another 
program, or change the existing program. 

Before training the network, all of the input patterns 
must be presented to the system. To do this, use the com- 


“mand SYS 49167 followed by the number of the pattern 


and then the pattern itself. The pattern should consist of 
1s and Os and should be enclosed within quotation marks. 
The first number corresponds to the activation of the up- 
per left PE in the input layer. The rest of the PEs are num- 
bered from left to right as shown in Figure 1. (See lines 
80-310 for an example of this.) 

Now the CL network is ready to learn, To teach it the 
patterns, simply enter SYS 49164 followed by the number 
of times you want the patterns to be presented. If you 
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Computing 


specify a large number, the program will take some time 
to complete because each time you present a set of pat- 
terns it takes nearly 15 seconds. In order to properly train 


Figure 2: Weights 


the network, you need to train it several hundred times, 63653 67248 0 0 

For 400 training runs, it takes over 60 minutes to train the 122666 141174 3283 0 

network. 142081 192964 61438 0 
Once the network has been trained, you should save 87442 91651 26394 0 

the current values so that another long training run will be 999994 

unnecessary. To do this, type SYS 49170 followed by the 

filename in quotation marks. To reload the network, use 9) 0385 135818 67980 

SYS 49173 followed by the filename in quotation marks, O 49159 200137 125781 
Now that the network has been trained and saved for 0 CLs 91572 108784 

further study, the network will correctly classify patterns 0 0 80543 97667 

according to the rules it derived. It will correctly classify 999994 


all the patterns you used to teach it, but it will also classify 
patterns you did not teach it. This is one of the most pow- 
erful features of the CL network, If you want the program 
to recognize a pattern, type SYS 49155 followed by the in- 
put pattern in quotation marks, The input pattern should 
consist of 1s and Os, and its length should be equal to p1 
(the number of PEs in the first layer). After this, the output 
pattern will be in 02, 

In the graph-partitioning program, the display consists 


pole that is on the left side of the grid is presented, the 
first PE in the second layer will be active. If it is on the 
right side of the grid, the second PE in the second layer 
will be active, 


of four parts. The first part consists of a 4 X 4 grid of 


weights on the connections between the PEs in the first 
layer and the first PE in the second Jayer. The next part is 
the total weight of all the weights on the connections in 
the 4 X 4 grid above it. The third part consists of another 


4 X 4 grid of weights on the connections between the PEs 


in the first layer and the second PE in the second layer. 
The final part is the total weight of all the weights on the 


connections in the second grid. Each of these numbers 
out of 1,000,000. 


is 


The total of all the weights should remain at or close 
to 1,000,000. This keeps the symmetry of the distribution 


of the weights and is vital to the functioning of the CL 


network, As the program progresses, the weights will be- 
come stronger on one side of the grid. Each grid should 
have weights that look like mirror images of each other. 


Figure 2 shows the weights after 400 training trials. Notice 


that the grid has been partitioned into two groups. If a di- 
COEG:02 AD OL 
cL COE8:02 AC B4 
COG0:4C 18 CO 4C 47 C2 EA EA 96 COFG:6A 85 7A 
C008:60 EA EA 6@ 4C FD C5 4C GA COF8:8B BG 8D 
CO10:31 C6 4C £8 C6 4C FB C7 G5 C1GG:A9 G1 8D 
CG18:26 FD AE 20 9E B7 8E A9 9B C1G8:38 G3 AD 
CO26:02 26 FD AE 20 9E B7 BSE CE C110:85 7B 20 
CO28:AA 62 20 FD AE 20 9E B7 4B C118:8C CO 62 
CO30:8E AC 92 26 FD AB AS 7A D6 C120:A9 GG 20 
C038:8D A7 02 AS 7B 8D AB G2 6A C128:AE BE 62 
C046:A9 58 85 7A AX C9 85 7B FF C130:Cl AD B1 
C048:20 8B BO 8D AD @2 8C AE EB C138:E0 AD BE 
CG50:02 AD A762 85 7A AD AB 6D C14G:C8 G2 8D 
C@58:02 85 7B 20 8A AD AE AD C3 C148:AE 38 03 
C066:02 AC AE 62 26 D4 BB AS 75 C150:C3 AC 35 
C@68:7A 8D A7 62 AS 7B 8D AB 7E C158:D4 
C676:02 A9 5B 85 7A AI C9 85 B4 
C678:7B 26 8B BO 48 98 48 AD 1F C168:03 
CG8G:A9 G2 26 3C BC 68 AB 68 66 C170:CO O2 20 
CO88:AA 20 D4 BB AI 5E 85 7A GBA C178:AD AD G2 
CO98:A9 C9 85 7B 26 8B BO 48 9A C18G:A9 G1 8D 
CG98:98 48 AD AA G2 20 3C BC 9E C188:8D 34 83 
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Sources: 


If you're intrigued by neural computing, check your library or 
university bookstore for the books listed below. 


Neural Computing: Theory and Practice 
By Philip Wasserman 
From Van Nostrand Reinhold 


Neurocomputing: Foundations of Research 
Edited by James A. Anderson and Edward Rosenfeld 
From MIT Press 


Parallel Distributed Processing (two volumes) 
Explorations in Paralled Distributed Proc: 
By Rumelhart, McClelland, and the POP Ri 
From MIT Press 


Note: To understand the models presented in these books, 
you'll need to have an understanding of linear algebra and 
elementary calculus, 








3C BC AE B3 DS ClpD6:8D 38 G3 4C 1B Cl Ad 7A 
26 D4 BB A9 C2 C1D8:85 7A AY C9 85 7B 20 8B 
C9 85 7B 20 GE C1EG:BG 8D C3 G2 8C C4 G2 AD 
@2 8C C2 O62 G4 C1E8:B3 G2 38 ES 2F 8D B3 G2 
03 A9 GG 8D F9 C1FO:AD B4 62 E5 36 8D B4 G2 
85 7A A9 C9 F7 C1F8:AD BF G2 38 E5 2F 8D BF 
BO 8D BF 62 2F C206:02 AD CO G2 ES 30 BD CO 
38 03 DO 11 AD C208:62 AD Cl 62 38 E5 2F 8D 
BC AC CO G2 SC C210:C1 G2 AD C2 G2 ES 36 BD 
D4 BB 4C 75 D8 C218:C2 ES 2F 
3C BC 26 97 CD E5 30 
8D 34 03 AD AG C228:8D 38 E5 
63 AC 36 G3 E3 C230:2D 8D AD 62 AD AE G2 E5 
AA G2 26 92 9C C238:2E 8D AE G2 AD A7 G2 85 
AE 34 63 20 24 C240:7A AD A8 B2 85 7B 66 AY 
@2 AC C@ G2 2D C248:00 8D BB G2 20 49 C6 Ad 
34 63 AC 35 2B C25G:01 8D 36 63 AY GO BD C5 
AE BF 62 AC 13 C258:62 A9 G1 8D 38 03 AD OO 
BB EE 38 03 33 C260:20 3C BC A2 CD AG G2 20 
38 63 BO 9B 25 C268:D4 BB AD BF G2 18 65 2F 
@3 AD BF 62 9E C276:8D 34 63 AD CO G2 65 30 
CO 62 8D 35 79 C278:8D 35 B3 AE 38 G3 AC 36 

€286:63 AD AA G2 20 92 C3 AD 

288:34 63 AC 35 G3 20 A2 BB 

C29G:AD Cl 62 18 65 2F 8D 34 
20 GF BB AC 11 C298:03 AD C2 62 65 30 8D 35 
03 20 D4 BB AG C2AG:03 AE BB 02 AC 38 G3 AD 
A9 G2 CD 38 26 C2A8:A9 G2 20 92 C3 AD 34 3 
36 63 AD AA FC C2BG:AC 35 G3 20 28 BA A9 CD 
99 68 AD GO AF C2B8:AG G2 26 67 BB EE 38 G3 


C2Cc6:AD 
C2c8:AD 
c2p0:c5 
C2D8:62 
C2E6:65 
C2E8:65 
C2FG:20 
C2F8:63 
C300:20 
C388:BC 






C318:36 
C320:02 
328365 
C330:65 
C338:20 
C340:03 
C34B:AA 
C350:59 
358:8D 
C360:8D 
C368:C3 
C376:03 





C380:18 
C388:03 
C390:C3 
C398:CA 
C3A0334 
C3AB:AD 
C3B0:88 
C3B8:05 
C3C8:00 
C3C834C 
C3D0:C8 
C3D8:48 
C3E0:23 
C3E8;8D 
C3F0:2F 
C3E8:30 
C400:78 
C408:AE 
C410:BB 
C418:36 
C420:03 
C428:36 
C430:02 
C438:BC 
C440:20 
C448:A0 
C450320 
C458:67 
C460:AD 
C468:03 
C470:03 
CA78:34 
C480:8C 
C488:02 
C490:C4 
C498:38 
C4AG:AC 






C4B0:FC 
C4B8: 20 
C4CG: 02 
cace:c4 
C4D0:02 
C4D8:C4 
C4E0:C6 


C4E8:AC. 


C4FO:B7 
C4F8:AD 
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C508:03 
C510:62 
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C528:01 
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C538:65 
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¢548:AD 
C550:BB 
C558:34 
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C578:AD 
C58G:AD 
C588:AD 
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C5AG:BB 
C5A8:34 
C5B0:35 
CS5B8:AE 
¢5C0:03 
C5CB:CD 
C5D8:93 
C508:34 
C5E0:EE 
C5E8:03 
C5PG:62 
C5P8:03 
C600:26 
C608:62 
C610:C9 
C618:E1 
C620:F3 





C630:A8 
C638:BB 
C640:02 
C648:B2 
C650:8F 
C658:D0 
C660:A9 
C668:AC 
C670:AD 
C678:31 
C680:38 
C688:Cl 
C690:AD 
C698:AD 
C6AG:BB 
C6AB:AC 
C6B0:83 






C6C8:AD 
C6D0:AD 





C708:14 
c710:c8 
C718:A2 





810714 
C818:C8 
C82G:A2 
828261 
830:26 
838326 
c848:CC 
848:CF 
850:8D 
C858:62 
C860:AE 
C868:85 







C878:AD 
880785 
C888:20 
C890:65 
898223 
CBAG:CB 
CB8A8:18 
C8BG:23 
ceB8:cD 
C8CO:A2 
C8C8:D0 





C8FO:84 
C8F8:8D 
C9GG:A9 





C916:62 
C918:BD 
C920:20 
c928:cC 
C930:0F 
C938:50 
C946:32 
c948:28 
C956:56 
C958:52 
C966:60 
C968:29 






C978:29 
c980:08 
C988:008 


BEFORE TYPING... 


Before typing in programs, 


please refer to “How to Type In 
COMPUTE!'s Gazette Programs,” 
elsewhere in this issue. 





HR 16 REM COPYRIGHT 1998 COMPU 

TE! PUBLICATIONS INC. - 

{SPACE}ALL RIGHTS RESERV 

ED 

PRINT" (CLR}{5}{N}":POKES 

3280,0:POKE53281,11 

IF PEEK(49153)<>24 OR PE 

EK(49157)<>194 THEN LOAD 

"CL.ML" 8,1 

X=RND (-33333) 

PRINT"INITIALIZING" 

SYS 49152,16,2,24,0.1 

PRINT"LOADING PATTERNS" 

SYS 49167,1,"11000000000 

gooa0" 

SYS 49167,2,"01100000000 

oo000" 

166 s¥S 49167,3,"0611000000 
Goo0g0" 

118 s¥S 49167,4,"0000119000 
600000" 

126 sYs 49167,5,"9900011000 
900000" 


GP 26 
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Future 
Computing (cont.) 


XE 
ec 
HA 
MB 
cE 
sb 
MB 
ED 
AB 
Qx 
JR 
EM 
Ag 
RG 
kQ 
FR 
BP 
SJ 
PG 


PA 
FR 


136 SYS 49167,6,"0000001109 KF 
900000" MC 

140 S¥S 49167,7,"000000GG11 AE 
sg0000" Js 

156 SYS 49167,8,"9000000001 XB 
199000" DG 

160 SYS 49167,9,"0000G00G00 SR 
110000" 

176 SYS 49167,16,"008GGG008 DG 
6901100" 

180 SYS 49167,11,"000000000 HR 
9900116" 

196 SYS 49167,12,"000000000 MA 
g0oo011" 

200 SYS 49167,13,"10001G009 KE 
8900000" 

210 SYS 49167,14,"010001000 DF 
6gg0G00" FD 

228 SYS 49167,15,"001000100 FR 
6900000" MG 

236 SYS 49167,16,"000190010 HQ 
oggaGao" XB 

240 SYS 49167,17,"000010001 CM 
9999900" FR 

250 SYS 49167,18,"900001000 GF 
1909900" 

260 SYS 49167,19,"G0000G100 EX 
d1go000" 

276 SYS 49167,26,"000000010 RG 
oo10000" 

280 SYS 49167,21,"000000001 BJ 
9901000" 

290 SYS 49167,22,"0000G0000 AX 
1900190" 

300 SYS 49167,23,"000000000 QR 
G1g0010" 8Q 

310 SYS 49167,24,"000000000 AE 
9910001" op 

320 PRINT" (CLR}" XQ 

330 FOR I=l TO 496 


COMPUTE!’s 


3468 
358 
366 
378 
386 
396 
4008 


416 
426 
436 
446 


450 
460 
470 
480 
496 
500 
516 
520 
530 


548 
550 
568 
570 
580 
590 
608 


610 
626 


SYS 49164,1 
T=0 

PRINT" {HOME}" 

FOR J= 1 TO 16 

A#INT (W1(1,J)*1006006) 
T=T+A 

IF A ¢ 10 THEN PRINT" " 


IF A ¢ 160 THEN PRINT" 
{SPACE}"; 
IF A ¢ 1600 THEN PRINT" 


IF A ¢ 106060 THEN PRINT 
IF A ¢ 160000 THEN PRIN 
to"; 

PRINT A, 

NEXT J 

PRINT: PRINT T 

PRINT 

T=9 

FOR J= 170 1 

AsINT (W1(2,J) *1600006) 
T=T+A 

IF A < 16 THEN PRINT" " 


IF A < 106 THEN PRINT" 
{SPACE}"; 
IF A ¢ 1006 THEN PRINT" 


i 
IF A ¢ 10000 THEN PRINT 
IF A ¢ 100000 THEN PRIN 
mM; 

PRINT A, 

NEXT J 

PRINT: PRINT T 

NEXT 1 

END 


emerge stl 


Looking for a Widget 
for your Printer 
and need it now? 

Call Precision! 


Precision Images stocks a complete 
selection of parts, supplies, and 
manuals for these printers: 

C. ITOH, QUME, CITIZEN, 
OKIDATA, FUJITSU, EPSON 
AND OTHERS 


For Visa/MC/Amex Call 
1-800-524-8338 


Precision ee 
P.O, Box 57: 
Chester, NY 10918 


Circle Reader Service Number 195 








Copies of articles from this 
publication are now available from 


the UMI Article Clearinghouse. 


Mail to: University Microfilms International 
300 North Zeeb Road, Box 91 Ann Arbor, MI 48106 





SpeedScript Disk 


A powerful word processing 


ackage for Commodore 
and Apple Il owners 


A Great Deal for Commodore 


Users! 


© SpeedScript for the 64 
© SpeedScript 128—80-column versi: 
© Spelling checkers 


@ Plus more than a dozen other SpeedScript 
support utilities all on one disk (including 


full documentation) 


Two Versions for Apple Users! 
© SpeedScript 3.0—40-column word processor 


ion 


© SpeedScript 80—80-column version 


© Conversion programs to move files from 


ProDOS to DOS 3.3 and back 
@ Full documentation on disk 





SpeedScript Disk. 


copies of COMPUTE 


| te enclosed $9.95 plus $2.00 postage and handling. 


(Outside U.S. and Canada add $1.00 


| $3.00 for air mail.) 


| ORDER NOW! 


for surface mail or 
Amount 


Sales Tax" 


‘Total 





| Name 





| Address 


State 





civ 
| Check here for: 


O Apple version 
© Commodore version 


| Mail personal check or money order to 


P.O. Box 5188 


Greensboro, NC 27403 


*Residents of New York, Pennsylvania, and North Carolina must add appropriate sales 
tax. All orders must be paid in US. funds by a check drawn on a U.S, bank. Sorry, no 


| credit card orders accepted. 


Commodore SpeedScript Disk 


or — Apple SpeedScript Disk 
P.O. Box 518: 


Greensboro, NC 27403 


Please allow 4-6 weeks for delivery. Program available only on S\-inch disks. 





Jeremiah Flint sy 


Create and use subdirectories on your 1581 without resorting to 
eryptic DOS commands. For the 128 with an 80-column 


monitor, 


The main advantage of the 1581 disk 
drive over Commodore’s other drives is 
its increased storage capacity. The 1581 
can store more than twice as much 
information per disk as can the 1571 
and almost five times as much as the 
1541, This extra storage space is great, 
but it poses a new problem. How do 
you organize the disk so that infor- 
mation can be found quickly and easily? 

Most computers that have high- 
capacity disk drives organize data using 
a hierarchy of directories and subdirec- 
tories, Unfortunately, none of Commo- 
dore’s equipment (including the 64, 
128, 1541, 1571, and 1581) supports 
subdirectories, The 1581 overcomes 
this limitation by allowing you to di- 
vide disks into separate sections, called 
partitions. 

The 1581's partitions are a cross 
between hierarchical directories and 
hard drive partitions. Like hard drive 
partitions, the 1581's partitions divide 
disks into sections. Each of these is 
treated as if it were another disk and 
must be formatted separately. But like 
hierarchical directories, the 1581's par- 
titions can be nested. 

The major obstacle in partitioning 
a 1581 disk is determining how to do 
this correctly. The 1581 user’s manual 
contains a lengthy but confusing dis- 
cussion on partitioning. To further 
complicate the matter, you must use 
several new DOS commands to create 
and access each partition. 

1581 Partitioner takes the work out 
of partitioning a disk. It offers several 





ways to partition disks; it creates parti- 
tions by location, by size, or by number. 
It also deletes, accesses, displays direc- 
tories of, and formats partitions. 


Typing It In 
1581 Partitioner is written entirely in 
BASIC, To prevent typing mistakes, 
type it in using The Automatic Proof- 
reader, found elsewhere in this issue. Be 
sure to save a copy of the program to 
disk once you've finished entering it. 
To begin using 1581 Partitioner, 
load the program and type RUN. The 
program first displays the main screen 
and then requests that you enter the de- 
vice number of the 1581 disk drive. 
Type the device number and press RE- 
TURN, or simply press RETURN to ac- 
cept the default value of 8. Next, 1581 
Partitioner displays a directory of the 
partitions on the current disk and then 
shows the main menu. 


FI CREATE A PARTITION 

F2 ACCESS A PARTITION 

F3 RETURN TO THE ROOT 

Fa DELETE A PARTITION 

FS FORMAT A DISK OR 
CURRENT PARTITION 

F6 CHANGE DRIVE NUMBER 

F7 VIEW DIRECTORY 

ESC EXIT PROGRAM 


Each menu option is described below. 


Creating Partitions 

Before you attempt to partition a disk, 
you should be sure that the disk is for- 
matted (you can use the Format a Disk 





or Current Partition option). If you're 
not sure whether the disk is already for- 
matted, you can use the View Directory 
option to check. You should also be 
aware that partitioning a disk can de- 
stroy files that are already stored on the 
disk, so copy important files to another 
disk before you begin. 

When you select the Create a Parti- 
tion option, the program displays a sub- 
menu containing three options for 
partitioning a disk: by number of parti- 
tions per disk, by size of the partition, 
or by location of the partition. A fourth 
option allows you to return to the main 
menu without altering the disk. 

If you want to divide the disk into a 
certain number of partitions, select the 
first option. The program prompts you 
for the number of partitions to create. 
Enter an even number from the range 
2-20. Next, the program asks if you 
want to save a copy of the program on 
the disk. Answer Y or N. The program 
then prompts you for the name of each 
partition. Enter a unique name for each 
and press RETURN. After you've an- 
swered all the prompts, the program 
creates and formats the partitions. 

To create a partition based on a cer- 
tain size, choose the second submenu 
option. The program prompts you for 
the partition’s size in blocks. Simply en- 
ter this within the following con- 
straints: The partition must contain at 
least 120 blocks (or sectors), its size 
must be an even multiple of 40, and it 
must be small enough that it doesn’t 
encompass track 40. This final con- 
straint limits partitions to a maximum 
of 1560 blocks. After you've entered the 
size, type a name for the partition and 
press RETURN. As with the first op- 
tion, the program prompts you to save a 
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1581 Partitioner 


copy of 1581 Partitioner on the disk. An- 
swer the prompts as before. 

The last option, creating a partition 
by its location, is intended for more ad- 
vanced users. This option is useful for 
creating a partition within a partition or 
one around a certain portion of the disk. 
If the disk already contains one or more 
Partitions, this is the only partitioning 
option that will work correctly. 


A 1581 disk has 80 tracks, num- 
bered 1-80, and each track contains for- 
ty 256-byte sectors, numbered 0-39. A 
partition must start on sector 0 of the 
specified track, and it must end on sec- 
tor 39 of the ending track. As men- 
tioned above, a partition may contain a 
minimum of 120 blocks and a maxi- 
mum of 1560 blocks. Remember, a par- 
tition cannot contain track 40; 1581 
Partitioner doesn’t check for errors, so 
be careful. 


Moving About 

To access a partition, press F2 from the 
main menu. When the program prompts 
you for the name of the partition, sim- 
ply type a name and then press RE- 
TURN, Once you access a partition, 
1581 Partitioner displays any partitions 
within the current partition. It also dis- 
plays the beginning track, ending track, 
and number of blocks within the parti- 
tion. If there are partitions within the 
current partition—that is, if they are 
nested—you can press F2 again to 
move into these. 

The 1581's disk operating system 
doesn’t provide a way to step back out 
of partitions one at a time. The only 
way to leave a partition is to go directly 
back to the root of the disk. You can 
move to the root directory by pressing 
F3 at the main menu. 


Other Options 

If you decide to delete a partition, select 
F4 from the main menu. When the pro- 
gram prompts you for the name of the 
ill-fated partition, enter it and press RE- 
TURN. If you change your mind, you 
can press F8 to abort the delete. Delet- 
ing a partition also deletes any files 
stored in it, including other partitions 
which may also contain files, so be 
careful when using this option. 

Press F5 at the main menu to for- 
mat a disk or the current partition. If 
you're currently in the root directory of 
the disk, this option formats the whole 
disk. If you're within a partition on the 
disk, it formats only that partition. 
When you select this option, the pro- 
gram prompts you for the name of the 
disk or partition to be formatted. Enter a 
name containing up to 16 characters 
and press RETURN. 

To partition another disk, place the 
new disk into the drive and select the 
Change Drive Number option from the 
main menu. The program displays the 


48 COMPUTE!'s Gazette March 1990 


current drive number and prompts you 
for the new drive number. If you want 
to use the same drive as before, simply 
press RETURN. To change to a differ- 
ent drive, enter the device number of 
the new drive. 1581 Partitioner displays 
the directory of the new disk and re- 
turns to the main menu, 

The standard directory listing 
shown by 1581 Partitioner displays only 
the partitions contained in the current 
directory. If you need to examine other 
files within the directory, press F7 at the 
main menu. The program displays the 
files in the window on the left side of 
the screen. Pressing NO SCROLL or 
CONTROL-S pauses the listing; press- 
ing the Commodore key slows the 
scrolling rate. 


In Your Own Programs 

When you've finished with 1581 Parti- 
tioner, press ESC to exit. The program 
leaves the disk drive in the current par- 
tition so that you can access it from 
BASIC. 

If you want to move between parti- 
tions from your own programs, you can 
do so with the following commands, To 
access a subdirectory, use the commands 


OPEN 15,device number,15,"/0:partition 
name” 
CLOSE 15 


If the disk drive successfully accesses 
the partition, the reserved variable DS 
should contain the value 2. Be sure to 
check the error channel before execut- 
ing the CLOSE 15 command. 

To return to the root directory, use 
the command 


OPEN 15,device number,15,"/" 
CLOSE 15 


As before, DS should contain a 2 if the 
command is successful. 


1581 Partitioner 


HQ 10 REM COPYRIGHT 1996 COMPU 
TE! PUBLICATIONS, INC. - 
ALL RIGHTS RESERVED 
COLORG, 1:COLOR4, 1:COLOR6 
1:COLORS, 4: IEPEEK (215) = 
OTHENPRINT"{CLR}SWITCH T 
© 8G-COLUMN MODE AND PRE 
SS A KEY": POKE208,0:WAIT 
208,1:POKE2G8,@:GRAPHICS 
DIMPNS$(21) :WINDOWG, 0,79, 
24,1:KEY1,"1":KEY2,"2" 
EY3,"3"2KEY4,"4":KEY5,"5 
“:KEY6, "6": KEY7,"7": KEYS 
"ABORT" +CHRS (13) :FAST:T 
RAP1G4G 
PRINTCHRS (142) CHRS (12)" 
{4 RIGHT}PARTITIONS ON T 
HIS DISK{4 RIGHT}B"; 
PRINT" (7 RIGHT} {A}CCCCCC 
eececcecceeceeceecccecccc 
cceecccc{s}” 

PRINT "cCcccccecececccece 
CCCCCCCCCCCCCEW} 

{7 RIGHT )B"TAB (78) "B" 
FORI=1T015:PRINTTAB(31)" 
B{7 RIGHT}B"TAB(78)"B"2N 
EXTI 


sp 2 


BG 3 











40 


xQ 50 





HC 60 


70 


QD 


FE 


E: 


x 


M 


3 


D 


ic) 


DM 


SR 


EE 


PJ 


JQ 


HE 


SM 


HX 


HP 


FH 


GA 
RD 
HA 


RK 


GP 


FG 


cQ 


86 PRINTTAB(31)"B{7 RIGHT) 
t2¥.CCCCCCCcCCCCCCCCCCCCE 
ceccecccccccccccc gx" 

96 PRINTTAB (31) "B"TAB (51) "U 
ceeccecceccecccci" 

199 PRINT "cccccccccccceccce 
CCCCCCCCCCCCCCEWF "TAB (5 

T)"B1581 (RIGHT } {API 
{9 RIGHT}B" 

118 PRINT"{31 SPACES }B"TAB ( 
51)"B{5 RIGHT} {Q?>K 
{9 RIGHT}B" 

120 PRINT"CCCCCCCCCCCER}CCC 
eccccce¢R}CCCccccc {Ww} "T 
AB(51)"B{5 RIGHT}BARTIT 
IONERB" 

130 PRINT"FIRST TRACKBLAST 

{SPACE}TRACKB BLOCKS B" 

TAB (51) "JecCCCccccccccc 

CCK" 

PRINT"cCccccccccc+cccce 

CCCCC+ECCCCCCCEW} "TAB (4 

6) "(C) 1990 COMPUTE!'S 

{SPACE)GAZETTE" 

PRINT" {11 RIGHT}B 

{10 RIGHT}B(8 RIGHT)B 

{HOME }":DV#8:GOSUB980:G 


146 


150 


0SUB1976 

166 GOSUB1080:WINDOW4G,1,77 
16,1 

170 PRINT"{4 RIGHT} {RVS}F1 


{OFF}{2 RIGHT}CREATE A 
{SPACE}PARTITION": PRINT 
"{DOWN} {4 RIGHT} {RVS}F2 
{OFF} {2 RIGHT)ACCESS A 
{SPACE}PARTITION" 
PRINT" {DOWN} (4 RIGHT) 
{RVS}P3{OFF}(2 RIGHT}RE 
TURN TO THE ROOT DIRECT 
ory" 

PRINT" {DOWN} {4 RIGHT} 
(RVS}F4{OFF}{2 RIGHT}DE 
LETE A PARTITION" 
PRINT" {DOWN} {4 RIGHT) 
{RVS}F5{OFF}{2 RIGHT}FO 
RMAT A DISK /":PRINT" 
{8 RIGHT}CURRENT PARTIT 
ION" 

PRINT" {DOWN} {4 RIGHT} 
{RvS}F6{OFF}{2 RIGHT}CH 
ANGE DRIVE NUMBER": PRIN 
T"(DOWN} {4 RIGHT}{RVS}F 
T{OFF}{2 RIGHT}VIEW DIR 
ECTORY" 

PRINT" (DOWN) (4 RIGHT) 
{RVS)ESC{OFF}{2 RIGHT)E 
XIT PROGRAM{HOME)" 
GETKEYAS: IFAS=CHRS (27) T 
HEN1049 

A=VAL (AS) :TFAC1ORA>7THE 
N230 
ONAGOSUB266,880,910,920 
946,980, 162:GOT0160 
IFBL<120THENPRINT" {CLR} 
{8 DOWN}"TAB(9)"NO ROOM 
FOR A PARTITION {DOWN)" 
3: PRINTTAB (15) "{RVS}PRES 
S A KEY":GETKEYAS:RETUR 
N 

PRINT" {CLR} {DOWN}DO YOU 
WISH TO CREATE A PARTI 
TION ON": PRINT" THE BASI 
S OF:" 

PRINT" {DOWN} (RIGHT) 
{RVS}FL{OFF){2 RIGHT}TH 
£ NUMBER OF PARTITIONS 
{SPACE}PER DISK" 

PRINT" {DOWN} {RIGHT} 
{RVS}F3{OFF}{2 RIGHT}TH 
E SIZE OF THE PARTITION 


186 


190 


208 


216 


226 


238 
240 
256 
260 


278 


280 


298 


300 PRINT" {DOWN} (RIGHT) 


{RVS}E5{OFF}{2 RIGHT} TH 


EE 


SR 
AM 


Ria 


MD 


AZ 


MA 


PM 


KP 


QF 
ks 


XJ 


xP 


DQ 
RC 


XX 


PP 


318 


3208 
336 
346 


356 


360 


370 


380 


390 
400 


410 


420 


430 


440 


450 
460 
470 


480 


490 
500 


510 


526 


E LOCATION OF THE PARTI 
TION" 

PRINT" {DOWN} {RIGHT} 
{RVS}F7{OFF}({2 RIGHT}RE 
TURN TO MAIN MENU" 
GETKEYAS:A=VAL (AS) :IFA< 
LORA>7THEN326 
ONAGOSUB34G, 326,560,320 
726 ,,320:RETURN 

PRINT" {CLR} (2 DOWN) THIS 
OPTION WILL CREATE A N 
UMBER OF":PRINT"EQUAL P 
ARTITIONS, USED AS 'MAN 
Y¥ DISKS":PRINT"IN ONE'" 
PRINT"HOW MANY PARTITIO 
NS WOULD YOU LIKE TO":P 
RINT"CREATE? (FROM 2 TO 
26, USE EVEN RINT" 
DOWN}{2 RIGHTJOR PRE 
{RVS}F8{OFF} TO ABOR 
{3 UP}" 
?NPS="": INPUT "NUMBE 
ONLY, PLEASE) ";NPS$:I 
FNPS="ABORT"THENRETURN 
NP=VAL (NPS) : TF (NP/2) <>1 
NT (NP/2) ORNP<2ORNP> 20TH 
EN340 

PRINT" {CLR} (4 DOWN}WOUL 
D YOU LIKE TO SAVE A CO 
PY OF" 

PRINT"THIS PROGRAM ON T 
HE DISK (¥/N) 2?" 
SP$="":GETKEYSPS: TFSPS< 
>"N"ANDSPS<>"Y¥"THEN4GG 
SCNCLR:FORI=1TONP: PRINT 
“WHAT WILL PARTITION #" 
I 

PNS(I)="":PRINT"BE CALL 
ED "I"{4 LEPT}";:INPUTP 
NS (1) : TEPNS (1) =""ORLEN ( 
PNS (I) )>16THENPRINT" 

{2 UP}":GoTO420 

NEXTI: PRINT" {CLR} 

{4 DOWN}{2 RIGHT}PRESS 
{SPACE} (RVS} RETURN {OFF} 
TO CONTINUE,": PRINT" 
{2 RIGHT}OR (RVS}FB 
{OFF} TO ABORT...":GETK 
EYA$+IFAS<>CHRS (13) THEN 
RETURN 

PRINT"{CLR}{7 DOWN} 

{2 RIGHT}CREATING PARTI 
TIONS ?S=INT (1586/(N 
P/2) =40*INT(S/40)21F 
NP=4ORNP=6THENS=S-49:GO 
70460 
IENP=2ANDSPS="Y"THENS=S 
-40 

=INT (S/256) : ¥=S- (X*256 
=1:T=S/40 6 
WINDOW4G,1,77,16,1:PRIN 
TI;:P$=PNS(I) :PRINT#15, 
"/0: "PS", "+CHRS (TT) +CHR 
$(G) #CHRS (Y)+CHRS(X) +", 
C": IEDS<>GTHENGOSUB1970 
GOSUB1090 






































+1: TPB=GAND ( 
TT*4G) +S>=1560THENTT=41 
?B=B+1l 

IEPNS (I) <>""THEN47 
WINDOW40,1,77,16,1:PRIN 
T"{7 DOWN}{2 RIGHT }FORM 
ATTING PARTITIONS..." 
FORI=1LTONP:WINDOW7@,8,7 
sPRINT#15, 








NGOSUB1076:PRINT#15, 
:GOSUB109G: RETURN 

PRINT#15,"N@:"+(PNS(I)) 
+", "+CHRS (INT (RND(1)*25 
) +65) +CHRS (INT (RND(1) *2 
5) +65) : IFDS<>GTHENGOSUB 


BG 


Gs 


FE 


BQ 


KA 


BP 


PD 


PF 


BR 


EE 
DK 


pc 


EP 


sQ 


PE 


MK 


ss 


EG 


MD 
FR 


538 


546 


558 


569 


576 


588 


598 


600 


610 


630 


640 


650 


660 


670 


680 


698 


700 


710 
726 


107: PRINT#15,"/":GOSUB 
1990:RETURN 
PRINT#15,"/": IFDS<>2THE 
NGOSUB107G: PRINT#15, "1G 
"CHRS (13) "/":GOSUB109. 
RETURN 
GOSUB1090:NEXTI:IFSPS=" 
¥"THENDSAVE"1581 PARTIT 
TONER" ,U (DV) 
GOSUB1970:RETURN 

PRINT" {CLR}{2 DOWN}THIS 
OPTION WILL CREATE ONE 
PARTITION": PRINT"OF A 
{SPACE}SPECIFIC SIZE, U 
SEFUL FOR A WORK": PRINT 
"AREA OR A BOOT SECTOR 
{DOWN}" 
PRINT"APPROXIMATELY HOW 
MANY BLOCKS WILL THE": 
PRINT"PARTITION BE? (MU 
LTIPLE OF 40 BETWEEN" 
PRINT"{2 DOWN}{2 RIGHT} 
OR PRESS {RVS}F8{OFF} T 
© ABORT...{3 UP}":LB=BL 
tI FLB>156@THENLB=1560 
PS=O:PS$="":PRINT"120 A 
ND"LB" BLOCKS PLEASE)"; 
: INPUTPS$: IFPSS="ABORT" 
THENRETURN 

PS=VAL (PSS) : IFPS<1200RP 
S>LBOR ( (PS/40) <>INT (PS/ 
40) ) THENS6 

PRINT" {CLR} {2 DOWN}WOUL 
D YOU LIKE TO SAVE A CO 
PY OF":PRINT"THIS PROGR 
AM ON THE DISK (Y/N) ?" 





SPS="": GETKEYSPS: IFSPS< 
>"Y"ANDSPS<>"N"THEN620 
PRINT"{CLR} {2 DOWN}WHAT 
WILL THE PARTITION BE 
{SPACE} CALLED?" :NS="":1 
NPUTNS: TENS=""ORLEN (NS) 
>16THENG30 

PRINT" {CLR} {4 DOWN) 

{2 RIGHT}PRESS {RVS}RET 
URN{OFE} TO CONTINUE,": 
PRINT"{2 RIGHT}OR {RVS} 
F8{OFF} TO ABORT...":GE 
TKEYAS: IFAS<>CHR$ (13) TH 
ENRETURN 

PRINT" {CLR} {7 DOWN} 

{2 RIGHT}CREATING PARTI 
TION...":PT=1:PS=40*(IN 
T(PS/4G)) :X=INT (PS/256) 
2¥=PS-(X*256) 
PRINT#15,"/0:"NS","+CHR 
$(ET) +CHRS (8) +CHRS(¥)+C 
HRS (X)+",C": IFDS<>@THEN 
GOSUB1670:PRINT315,"/"= 
GOSUB1090: RETURN 
PRINT#15,"/ 
2THENGOSUB1670:PRINT#15 
."/"3GOSUB1LO96:RET 
GOSUB1090:WINDOW49,1,77 
716,1:PRINT"{7 DOWN} 

{2 RIGHT}FORMATTING PAR 
TITION..." 
PRINT#15,"NG:"NS","+CHR 
$ (INT (RND (1) *25) +65) +CH 
RS (INT (RND (1) *25) +65) :T 
FDS<>@THENGOSUB107 
NT#15,"/":GOSUB109 
URN 
IFSP$="Y"THENDSAVE"1581 
PARTITIONER",U (DV) 
GOSUB1070:RETURN 

PRINT" {CLR}{2 DOWN}THIS 
OPTION WILL CREATE A P 
ARTITION":PRINT“AT A CE 
RTAIN LOCATION AND A CE 
RTAIN": PRINT" SIZE, USEF 
UL FOR PROTECTING A" 























BG 


XR 


RD 


HG 


sc 


PE 


BE 


EJ 


HE 


cE 


XS 


CR 


FK 


QB 


AR 
EH 


GD 


MK 


HM 


BK 


730 
740 
758 


768 


778 


780 


790 


800 


810 


820 


838 


846 


856 


860 


876 
880 


890 


900 


919 
920 


PRINT"PARTICULAR PORTIO 
N OF THE DISK":PRINT" 
{3 DOWN} {2 RIGHTJOR PRE 
SS {RVS}F8{OFF} TO ABOR 
T...{4 UP}" 

PRINT"WHAT WILL THE PAR 
TITION BE CALLED?":NS=" 
"s INPUTNS: [ENS=""ORNS: 
ABORT "THENRETURN 
IFLEN (NS) >16THEN7 46 
FT=@:TFS=RIGHTS ("OO"+ST 
RS (TE+1) ,3) PRINT" {CLR} 
{2 DOWN}WHAT IS THE STA 
RTING TRACK{2 SPACES}"T 
FS"{4 LEFT)"; :INPUTET:I 
FET=40ORFT<TE ORFT>TLTH 
EN760 

$S=0:LB=BL: IFLB>1560THE 
NLB=1560 

PRINT" {DOWN}HOW MANY SE 
CTORS IS IT (MULTIPLE 0 
F 4G":PRINT"BETWEEN 120 
AND"LB") "; : INPUTSC:IFS 
C<12GORSC>LBOR ( (SC/48) < 
>INT (SC/40) ) THEN770 
PRINT" {CLR} {4 DOWN} 

(2 RIGHT}PRESS {RVS)RET 
URN{OFF} TO CONTINUE,": 
PRINT"{2 RIGHTJOR (RVS} 
F8{OFF} TO ABORT...":GE 
TKEYAS: IFAS<>CHRS (13) TH 
ENRETURN 

X=INT (SC/256) :Y=SC-(X*2 
56) :PRINT"{CLR}{7 DOWN} 
{2 RIGHT}CREATING PARTI 
TION..." 
PRINT#15,"/6:"NS","+CHR 
Ste VECHRG AES) ACHR (3) 
CHRS (X) +",C": IFDS<>OTHE 
NGOSUB1670:PRINT#15,"/" 
:GOSUB1690:RETURN 
PRINT"{CLR}{2 DOWN}WOUL 
D YOU LIKE TO FORMAT TH 
E NEW": PRINT"PARTITION 
{SPACE} (Y/N) 
GETKEYAS: IFAS<>" 
<>"N"THENB30 
PRINTAS$: IFAS="Y"THENBEG 
IN: PRINT" {CLR} {7 DOWN} 
{2 RIGHT}FORMATTING PAR 
TITION. 
PRINT#15,"/@:"NS$zIFDS<> 
2THENGOSUB1070:PRINT#15 
1"/"3GOSUB1090: RETURN 
GOSUB1090:PRINT#15,"N 
"NS", "+CHRS (INT (RND (1) * 
25) +65) +CHRS (INT (RND (1) 
*25)+65) : IFDS<>OTHENGOS 
UB1070:PRINT#15,"/":GOS 
UB1090:RETURN 

BEND: GOSUB1670: RETURN 
PRINT "{CLR}{6 DOWN}ENT 
ER NAME OF PARTITION TO 
ACCESS, ":PRINT"OR PRES 
S [RVS}F8(OFF} TO ABORT 
«..":NAMES=""s INPUTNAME, 
$: IENAMES=""ORNAMES="AB 
ORT" THENRETURN 
PRINT#15,"/6:"+NAMES:1F 
DS<>2THENGOSUB1070: PRIN 
T#15,"/":GOSUB1090:RETU 























" 





ANDAS 















RN 
GOSUB1676:GOSUB1090:RET 
URN 

PRINT#15,"/":GOSUB1090: 





GOSUB1070: RETURN 
PRINT"({CLR} {6 DOWN)ENTE 
R NAME OF PARTITION TO 
{SPACE} ERASE,":zPRINT"OR 
PRESS {RVS}F8{OFF} TO 
{SPACE}ABORT...":Z$="": 
INPUTZS: IFZS="ABORT"ORZ 
$=""THENRETURN 
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ATTENTION 


ALL COMMODORE 64/64C 
AND COMMODORE 
128/128D OWNERS 







A complete self—tutoring BASIC programming course is 
available that starts with turning your computer on, to 
Programming just about anything you want! This course 
Is currently used in both High School and Adult Evening 
Education classes and has also formed the basis of 
teacher literacy programs. Written by a teacher, who 
after having taught the course several times, has put 
together one of the finest programming courses avail- 
able Jonny This complete course of over 220 pages is 
available for the COMMODORE 64/64C, and for the 
COMMODORE 128/128D computers. This course 
(Volume 1) will take you step by step through a 
discovery approach to programming and you can do it 
all in your leisure time! The lessons are filled with 
examples and easy to understand explanations as well 
as many programs for you to make up. At the end of 
each lesson is a test of the information presented. 
Furthermore, ALL answers are supplied to all the 
questions and programs, including the answers to the 
tests. Follow this course step by step, lesson by lesson, 
and turn yourself into a real programmer! You won't be 
disappointed! 

FOLLOW-UP COURSE (Volume 2) - A 200 page 
self-learning course for each of the above named 
computers dealing exclusively with sequential and 
relative files. Our teacher uses a unique approach to 
file handling that was designed especially for students 
with absolutely no prior file handling experience. Yet by 
the end of the course you will be able to make up many 
of your own personal and business file programs. 

Each course is only $21.95 plus $3.00 for ship— 
ping and handling. We have been developing and 
selling Commodore courses for over 6 years now and if 
you do not think that we have the best self— 
tutoring course you have yet come across, then 
just send the course back to us within 10 days of 
receipt for the FULL $24.95 refund. 

Note: We also sell programming courses for all versions 
of the Amiga computer as well as a self-learning 
AmigaDOS course. 








| ADDRESS: 
CITY: 

| STATE/PROV: CODE: 

i | desire the BASIC programming course (Volume 1) 1] 
| FOLLOW-UP course on file handling (Volume 2) [] 
|The computer that the course is needed for: 

| COMMODORE 64/64C [] COMMODORE 128/128D L] 


H For each desired course, send $24.95 cheque or 
| money order (in the currency of your country) to: 


Brantford Educational Services 
222 Portage Road 6 Pioneer Place 
P.O. Box 1327 or Brantford, Ontario 
Lewiston, New York 14092 N3R 7G7 

Fax: (519) 758-2743 Telex: 061-81260 














1581 Partitioner 


cc 


cK 


AR 


QF 


EA 


aM 


RK 


Po 


Ps 
KF 


sJ 


ce 


HE 


AJ 


EP 


co 


DK 


930 SCRATCH (Z$) ,U(DV) :GOSUB 
107: RETURN 

946 PRINT"{CLR]}{5 DOWN}ENTE 
R NEW NAME OF DISK OR": 
PRINT"CURRENT PARTITION 
TO BE FORMATTED,":PRIN 
TOR PRESS (RVS}F8{OFF} 
TO ABORT..." 

950 PRINT"{2 DOWN) {RIGHT} 
({RVS}WARNING(OFF}: FORM 
ATTING WILL DESTROY ANY 
": PRINT" {RIGHT} PARTITIO 
NS VISIBLE IN THE DIREC 
ToRY!{4 uP}" 

960 DS="":INPUTDS: IFDS="ABO 
RT"ORDS=""THENRETURN 
970 PRINT#15, "NOI"+DS+", "+C 
HRS (INT (RND (1) *25) +65) + 
CHRS (INT (RND (1) *25) +65) 
2 INPUT#15,EN,EMS$,EN,E! 
PRINT#15,"/":GOSUB109 

RETURN 

986 WINDOWS, 6,79,24:PRINT" 
{24 DOWN}{11 SPACES) 
{RIGHT}{1@ SPACES} 
{RIGHT} {8 SPACES) {HOME} 
"3WINDOW40,1,77,16,13PR 
INT"(6 DOWN} {10 RIGHT}I 

NSERT A 1581 DISK" 

990 PRINT"{9 RIGHT}IN DEVIC 
E NUMBER "DV:PRINT" 

{9 RIGHT)AND PRESS RETU 
RN...":INPUT"{2 UP) 

{25 RIGHT}";AS:DV=VAL (A 
$) : IFOV<8ORDV>11THENIBO 

1006 CLOSE15:0PEN15,DV,15," 
10": PRINT#15, "M-R"CHRS 

(198) CHRS (229) CHRS (1): 
GET#15,AS: IPAS<>CHRS (2 
55) THENPRINT"{2 DOWN}" 
TAB(7) "THAT DRIVE IS N 
OT A 1581":SLEEP1:GOTO 
980 

1619 GOSUB910:RETURN 

1020 WINDOWG,0,79,3:PRINT" 
(6 SPACES)FILES ON THI 
S DISK{6 SPACES}":WIND 
OW1,2,30,18,1:DIRECTOR 
¥ U(DV) :WINDOW4G,1,77, 
16,1:PRINT"{7 DOWN} 

{3 RIGHT)PRESS ANY KEY 
TO CONTINUE..." 

1030 GETKEYA$:GOSUB1070:WIN 
DOWG,@,79,3:PRINT" 

{4 SPACES)PARTITIONS 0 
N THIS DISK{3 SPACES}" 
RETURN 

1040 CLOSE15:KEY1, "GRAPHIC" 
KEY2, "DLOAD"+CHRS (34) 
?KEY3 , "DIRECTORY" +CHRS 
(13) 

1058 KEY4,"SCNCLR"+CHRS (13) 
: KEYS, "DSAVE"+CHRS (34) 
:KEY6, "RUN" +CHR$ (13) 

"LIST" +CHRS (13) 2K 
EY8, "MONITOR" +CHRS (13) 
:WINDOWG,0,79,24,1:END 

1076 WINDOW], 20,30,20,1:PRI 
NTDSS; : RETURN 

1986 WINDOW1,2,30,18,1:DIRE 
CTORY"*=C",U (DV) : RETUR 
N 

1096 WINDOWG,0,79,24:PRINT" 
{24 DOWN}{11 SPACES} 
{RIGHT}{16 SPACES} 
{RIGHT}{8 SPACES}{UP}" 
?TE=VAL (MIDS (DS$, 24,2) 
) :TL=VAL (MIDS (DS$,27,2 
)) :BL=(TL-TF) *46 

1106 PRINTTAB(4) TPTAB(15)TL 
TAB (24) BL"{HOME}":RETU 
RN 
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ORDER TODAY!! 


-800-729-9000 


THE "GREAT DEAL" CATALOG 


PACKARD BELL 2 PACKMATE 286 COMPUTER WITH VGA COLOR MONITOR 


‘America grew up listening to us. It still does. 


Compute complex projects with this power packed 286 Packard Bell 
Computer and VGA Color Monitor. A 30 MB hard drive, 80286 micropro- 
cessor, 2 disk drives, and high resolution VGA color monitor make this 
computer a must--ideal for desktop publishing! 
+ 80286 microprocessor (operates at 12 MHz). + One 3-1/2" 1.44 MB floppy drive. 
+ One 5-1/4" 1,22 MB floppy drive, + 30 MB hard drive. + 1 MB RAM on 

motherboard: expandable to 3 MB, + Includes VGA 14" color monitor & VGA card. 
+ High res. monitor : 480 x 600, & 256 colors. + IBM compatible. + AT compatible. 
+8 expansion slots. + Dual FOD/HOD controller. + 2 half height drive cavities exposed. 
+1 half height drive cavity enclosed. + 2 serial ports. + 1 parallel port, 
+ System configuration in CMOS with battery back-up. 
+ Included software: MS DOS 3.3 & GW BASIC, + 145W Universal powor supply. 
+ Socket for 80287 co-processor on motherboard. * Zero wait state. Nem No, B-1806-132142 
+ One Year Warranty! + Factory New! Factory Perfect! Insured Ship/Hand,: $39.00 


TURBOSPORT 386 PORTABLE 
VEMATAT —~"\xptor COMPUTER aiNlefe)si5 

7 Organize your printer and 
ae paper on this handsome 
Fan LR DESE aaRunetT Wiarton te Printer Stand. This printer 
+ One 3.5" 1.4 MB floppy disk drive, stand holds everything you 
= 100% BM compatible, +2 MG RAM need to print out reports. It 
“Jos! vewng ave. “MS-008 921 cued even catches the paper on a 
+ Supports: MS OS/2 version 1,0, Xer backside shelf. Pick one up at 


also Microsoft Windows/386 environments, a A 
+ Socket for 0987 numeric coprocessor 3 alsuper jow price! 
+ Zoro wall stato, 0 * Converien printer stand for 
+ Internal Hayes 2400 Baud modem. Mi 1 office/home. + Feeds from top. 

Serial and parallel printer ports. a se ee + Handy shelf in back to collect long Mig. Sugg. Retail: 
Resoluton: 640 x 400 pices 1) 499. printed reports. + Handsome styling. $8,499.00 


Hie bay Fi Kineton cesachigere Neyer DAMARK PRICE: + Wood grain finish. + Great for data processing. DAMARK PRICE: 


Real time clock and calendar 


*Fast" charge NiCad battery pack included, $ + Coordinates with all otfice decor. $ 
+ AC adapter. + Dim,: 13,25°W x 14,75°D x 4.75°H, *Dim.: 27°H x 25°W x 23-5/8"D. 


+ Weight: 14.7 Ibs, + One Year Warranty! tem No b'1606-128006  ° Model #: 56143. 
: ttom No. B-1008-129605 
Factory New & Perfect! Insured Shipand. $19.00) * Factory New! Factory Perfect! Insured ShiptHand.: $9.50 


Manufacturer's 
Suggested Retall: 


$3,449.00 


}@ SCHLAGE. Wireless Security System g 3-1/2" Floppy 
KEEPSAFER PLUS Bulk Diskettes 


+ Koopsalor Plus secunty systom~wiral Use these top-rated disks in 


+ Advanced control console your drive for the ultimate in 
‘Whom away from home, sot exit and entry 
dolay on selected nirances (up to 40 reliability. Now pick up a 50 


seconds). Return without sounding alarm 
+5 alarm modes. « Handheld remote control or 100 pack at a great price! 
‘76 transmitters with batteries, 6 sets + 3-1/2" disks. + Double sided/double density. 
of sensors. » Back-up Power Supply Unit. + 100% Certified Error-Free. 
Insures continuous operation up to.6 hours +1 MB storage capacity PACK OF 100 PACK OF 50 
power supply as, Rocharges (unformatted). DISKETTES DISKETTES 
NEA EON aN Sut: Beta + Media life is greater than Mfg. Sugg, Retail Mg. Sugg, Retail 
sscrowdrivor is nooded! 20 million revolutions. $299.00 $149.00 
* Main unit dim. 19°W. x | DAMARK PRICE:} + 100% certified error-free (CXNIG ata T3y 
Lx 24172". in performance, $ $ 


+ One Year Warranty! 
+ Factory New! + Lifetime warranty 


Factory Perfect! ; through Sony. tom No, B-1806:129619 Item No. B-1806-129601 
ysured Ship/Hand.: $9.50 * Factory New & Perfect! insured S/H.: $6.00 Insured SIH: $5.00 


A 
F on ee Ata SER UGE fxr | aasreard)) — [OT¥]_DesonieTion Tews Sai | PRE 
































































| 

m 1-800-729-9000 ag a 
CUSTOMER SERVICE: 1-612-566-4940 J = a 

Ll er a DeLVERTO aU CONTENT STATES _ 

| | ADDRESS maga SUB TOTAL 

poets See a 

| | (1 Check/Money Order [J VISA SIGNATURE ait ae B-1806 a 
[Cl MasterCard [Discover CARD NO. EXP. DATE. = 

Qq [53] Send To: DAMARK INTERNATIONAL, INC., 6707 Shingle Creek Parkway, Minneapolis, MN 55430 al i 4 


Circle Reader Service Number 187 





The Commodore 128 has one of the 
best screen editors available on a per- 
sonal computer. With it, you can use 
the 128’s character graphics to create 
colorful, eye-catching screens. How- 
ever, there are a couple of problems 
with generating screens this way. First, 
you have no way to save the screens 
after you've created them, And second, 
they're not easy to incorporate into 
your own programs, 

Screen Designer 128 helps you cre- 
ate text screens for your BASIC pro- 
grams. With Screen Designer 128, you 
can design up to five text screens using 
the 128’s editing and graphics keys as if 
you were in direct mode. Thus, you 
have the freedom to move about the 
screen, changing colors and typing text 
and graphics characters as you go. 
When you've completed your screen, 
Screen Designer 128 allows you to print 
it or save it for future use. 


Getting Started 

Screen Designer 128 is written entirely in 
BASIC. Enter the program from 128 
mode using The Automatic Proofreader, 
found elsewhere in this issue. Be sure to 
save a copy of the program to disk 
when you've finished typing. 

When you're ready to design a 
screen, load and run Screen Designer 
128. You'll be presented with a menu of 
11 options for creating, saving, loading, 
and printing up to five different 
screens. There are also menu options 
for such tasks as viewing a disk directo- 
ry, scratching a file, formatting a disk, 
and generating the BASIC code that re- 
creates one of the five screens. 


Menu Options 

The first option is Design a Screen. Se- 
lect this option to create artwork, to 
write a memo to yourself, or just to doo- 
dle on an electronic scratch pad. Screen 
Designer 128 asks you which screen 
you'd like to design. Type in a number 
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Design impressive 
text and graphics screens 
on your 128 
with this handy, 


easy-to-use program. 
A Commodore odd-series 
printer or compatible 
is optional. 





from 1 to 5. The screen then clears, and 
you're put in design mode. Use the cur- 
sor and color control keys to move 
about and change text colors as you 
would in direct mode, Press F1 to incre- 
ment the background color or F3 to dec- 
rement it. 

When you've finished designing, 
press F5. This saves your screen in 
memory and returns you to the menu. If 
you want to leave design mode without 
storing the screen in memory, press the 
ESC key. 

The second menu option is Save a 
Screen. It allows you to save one of the 
five screens to disk for future use. Enter 
the number of the screen you wish to 
save, or press the back-arrow key (+) to 
abort the save. After selecting the 
screen, type in a filename. This name 
must be 15 characters or less in length. 
Screen Designer 128 saves two files; The 
first contains the screen information; 
the second contains color information. 
The second file has a C appended to its 
name. 

The third option is Load a Screen. 
With this option, you can load a screen 
created previously with Screen Designer 
128. Enter a screen number, then the 
name of the file. Note that, as the file 
loads, any information previously 
stored in this screen will be overwrit- 
ten. As with the save option, the back 
arrow aborts the operation. 


Next is the View a Screen option. 
Select this option to view any of the five 
screens in memory. Simply enter the 
number of the screen you wish to view 
and it will appear. Press any key when 
you've finished viewing the screen. 

Option 5 is Edit a Screen. Select 
this option to modify one of the five 
screens in memory, Enter a screen 
number and the program will display 
that screen and put you in design mode. 


Disk Options 

The next three menu options are specif- 
ic to the disk drive. Option 6, Disk Di- 
rectory, displays onscreen a listing of 
the files on the disk. This is useful for 
finding previously saved screens with- 
out leaving Screen Designer 128. Press 
the NO SCROLL key to pause the di- 
rectory listing. Screen Designer 128 auto- 
matically pauses at the end of the 
listing. Press any key to resume. 

The next two options are very pow- 
erful and should be used with caution. 
Option 7 scratches a file on disk. The de~ 
leted file can be any file—not necessar- 
ily one created with Screen Designer 128, 
Type in the name of the file that you 
wish to scratch and press RETURN 
(press the back-arrow key to abort the 
delete). If you're deleting a screen creat- 
ed with Screen Designer 128, remember 
to scratch the color file as well. 

Choose option 8 to format a disk. 
Screen Designer 128 waits for you to in- 
sert a disk and press RETURN. It then 
formats the disk and displays a directo- 
ry listing. As always, you can press the 
back-arrow key to abort the operation. 


Miscellaneous Options 

The Generate Code option creates 
BASIC statements that recreate one of 
the screens. These statements are ap- 
pended to the end of Screen Designer 
128, When you choose this option, 
you're first asked for the starting line 
number for the generated code. Enter a 


number greater than 2300 and less than 
60000. Screen Designer 128 then asks 
which screen to code. Enter a number 
from 1 to 5; then press any key to begin 
the coding process. 

Screen Designer 128 displays the 
line numbers used to code each of the 
five screens when this option is select- 
ed, This is useful when you need to 
code more than one screen. To avoid 
overwriting a previously coded screen, 
be sure to enter a starting line number 
that doesn’t conflict with a previously 
coded screen, 

The Print Screen option prints one 
of the screens on a Commodore odd- 
series printer (a 1525, an MPS-801, an 
MPS-803, and so on). You're first asked 
if you want the screens printed in text 
mode (with the upper-/lowercase char- 
acter set) or in graphics mode (with the 
uppercase/graphics character set). If 
you choose text mode, you're asked if 
the screen should be printed in 40 or 80 
columns. If you choose 40, the text is 
automatically centered on the page; 
otherwise, it’s printed normally. 

The last menu option is Screen 
Color. Press F1 to increment the screen 
background color or F3 to decrement it. 


Using the Screens 

Screen Designer 128 is written so that 
the screens you create with it can be 
used in your BASIC programs without 
Screen Designer 128's support. There are 
two ways to do this. The first way is to 
simply BLOAD a saved screen. 

For example, let's say you have a 
screen stored on disk as PICTURE. The 
following BASIC statements load the 
picture and its color information: 


BLOAD“PICTURE”,B15,P1024 
BLOAD“PICTUREC",B15,P55295 


Note once again that the file holding 
the color information has a C appended 
to its name. 

The other way is to have Screen 
Designer 128 generate the BASIC code 
to recreate the screen. This places 
BASIC PRINT statements at the end of 
Screen Designer 128, as explained above. 
After coding your screens, exit Screen 
Designer 128 by pressing RUN/STOP- 
RESTORE, Type DELETE 10-2300 to 
eliminate the lines of code specific to 
Screen Designer 128 itself. The lines 
which remain can then be added to 
your own BASIC programs to generate 
each screen. 


Screen Designer 128 


HQ 10 REM COPYRIGHT 1999 Compu 
TE! PUBLICATIONS, INC. - 
ALL RIGHTS RESERVED 
FAST:GRAPHIC1L,@:GRAPHICO 
:COLORG, 1:COLOR4 ,4:SC=1: 
DIMKC (16) : SLOW 

PRINT" {CLR} (8 DOWN} {3}"T 
AB(12) "SCREEN DESIGNER" 
XS 40 PRINTTAB(12)"{DCWN}{5}CO 


EM 20 


SA 30 


KB 


BS 


DE 


SK 


PH 


PQ 


BF 


pp 


RK 


SB 


FF 


RE 


HE 


cA 


HE 


AK 
xs 
QD 
FS 


FG 


MM 
Pc 


BB 


50 


90 


106 


116 


160 


196 


208 


210 


220 


2368 
240 
258 
260 


270 


280 
2968 


300 


PYRIGHT 1990 

PRINTTAB (7) " {DOWN} {5}COM 
PUTE! PUBLICATIONS, INC. 
“: PRINTTAB (10) "{DOWN} <5} 
ALL RIGHTS RESERVED" :SLE 





BANK1: JE=POINTER ( 
O= PEEK (JF+1) :HI=PE 
BK (JE+2) 

Y=PEEK (JE) :X=10:A=250:BA 
NK15:POKE250,L0:POKE251, 
HI: POKE252, 1:SYS65381,A, 
X,Y¥:X=9:SYS65381,A,X/¥ 
GOT02200 

REM -- MAIN MENU =~ 
TRAP8G: SLOW: COLORG, 1: PRI 
Nr" {CLR} (2 HOME}"; TAB (18 
)"{3PMENU"+CHRS (142) : POK 
£208,0 

TT$="{DOWN) (9 RIGHT) {3} ( 
“:PRINTTAB(18)"{4 Y}{UP} 
" 


PRINTTTS"1) (CYN) 

{3 SPACES}DESIGN A SCRE 
EN" 

PRINTTTS$"2) (CYN) 

{3 SPACES)SAVE A SCREEN 
“ 


PRINTTTS"3) (CYN} 
{3 SPACES}LOAD A SCREEN 
“ 


PRINTTTS$"4) (CYN} 
{3 SPACES)VIEW A SCREEN 


PRINTTTS"5) (CYN} 
{3 SPACES)EDIT A SCREEN 
" 


PRINTTTS$"6) (CYN) 

{3 SPACES}DISK DIRECTOR 
y" 

PRINTTTS$"7) {CYN} 

{3 SPACES}SCRATCH A FIL 
E" 

PRINTTTS"8) {CYN} 

{3 SPACES}FORMAT A DISK 


PRINTTTS$"C) (CYN} 
{3 SPACES}GENERATE CODE 


PRINTTTS"P) (CYN} 

{3 SPACES}PRINT A SCREE 
nt 

PRINT" {DOWN} {3} 

{5 SPACES} (F1/F3) (CYN} 
{3 SPACES}SCREEN {PUR}C 
{YEL}O{GRN}L{7}0(RED}R" 
PRINT" { YEL }CCCCCCCCCCCC 
ececeecececececcceccccc 
¢cece" 

PRINT" {RIGHT} {3}USE 
{CYN}<{3} OR (CYN}RUN/S 
TOP{3} TO (CYN)ESCAPE 
£3) A ROUTINE (HOME }":WI 
NDOWG,0, 39,22 

GETA$: POKE208, 0: 1FAS="P 
"PHEN1200 
IFPEEK (212) =5THENKU=- 
GOSUB960 

IF PEEK (212) =4THENKU=1:G 
OSUB960 
TFAS="C"THENLQ=LN:GOTOL 
896 

IEVAL (A$) <1 ORVAL (AS) >8 
THENPRINT"(2 UP)":GoTO2 
30 

ONVAL (A$) GOTO360,456,60 
8,750, 750,926,1136,1016 
REM -- DESIGN A SCREEN 
{SPACE} -- 
PRINT"{CLR}{3}{2 DOWN}E 
NTER WHICH SCREEN TO DE 
SIGN..." 








PJ 


HQ 
FK 


EH 
QP 


FK 


KI 
BD 
GM 


XD 


CF 


HC 


DH 


HD 


SH 


DH 


cG 
cD 


AC 


Qa 


AR 


310 


326 
338 


346 
3508 


35 


a 


368 
365 
376 


380 


398 


39 


a 


46) 


4a 


= 


41 


s 


420 


430 


440 
450 


460 


470 
480 


498 
500 


516 
52 


s 


538 
546 


550 


56 


57) 


PRINT"(CYN}1, 
{SPACE}OR 5.. 
GETKEYK$: IPKS="<"THEN8O 
IFVAL (KS) <LORVAL (KS) >5T 
HEN320 

RS=1:GOSUB800 

PRINT" {2 HOME} {CLR} 
{YEL}";:POKB248, 255 
IX=PEEK (235) :JY=PEEK (23 
6) :CP=1024+JX*40+JY: POK 
ECP, (PEEK (CP) +128) AND25, 
5 


2, 34 4 
" 





TRAP360: IEPEEK (208) >OTH 
ENGETJF$:GOTO400 
JF=PEEK (212) :1FJP=88THE 
N365 

GETIFS: 1FIF=72THENPOKE2 
48, 0:GOTO80 
IFJP=4THENPOKE5S3281, (PE 
EK (53281) +1) AND15:GOTO3 
60 
IFJF=5THENPOKE53281, (PE 
EK (53281) -1) AND15:GOTO3 
60 

IF JE =6THENJX=PEEK (235): 
JY=PEEK (236) :CP=10244+dX 
*40+3¥: POKECP, (PEEK (CP 
+128) AND255:GOT0410 
IX=PEEK (235) :JY=PEEK (23 
6) ;CP=10244+IX*40+JY :POK 
ECP, (PEEK (CP) +128) AND25 
5:PRINTJES; 
JX=PERK (235) : JY=PEEK (23 
6) :CP=1624+IX*40+JY: POK 
ECP, (PEEK (CP) +128) AND25 
5:GOTO360 
POKE183,0:POKE184,4:POK 
£186,0:POKE187,216:POKE 
248, 0:TRAP8G 
POKEL77,P(SM+1) : POKEL78 
+P (SM#2) : POKE179, P (SM+3 
) :POKE186,P(SM+4) :SYS35 
84 

PRINT" {CLR} {2 HOME) 
{OFF}{3}{2 DOWN} SCREEN 
{SPACE}NOW IN MEMORY... 
";SLEEP1:POKE248,0:CLOS 
£1:GOTO8G 

REM -- SAVE A SCREEN -- 
PRINT" {CLR}{3}"TAB(13)" 
SAVE A SCREEN" 
PRINTTAB(13)"{13 ¥}>" 
PRINT"(5 DOWN)"; :FS="" 
PRINT"ENTER WHICH SCREE 
N TO SAVE...":PRINT" 
{CYN}1, 2, 3, 4, OR 5: 
{2 SPACES} (YEL}YOUR CHO 
ICE{RIGHT}--> ( )" 
GETKEYKS: [FKS="<"THEN8O 
TEVAL (KS) <LORVAL (K$) >5T. 
HEN49O 

SM=VAL (KS) : PRINT" {HOME ) 
£3}(8 DOWN) "TAB (36) ;KS 
PRINT" (CYN} {DOWN} ENTER 
(SPACE}A NAME FOR SCREE 
N #£3>"SM"{CYNJAND HIT" 
PRINT" {RVS} RETURN {OFF} 
43}";s INPUT FS:IFLEN(FS 
)>150RES=""THENPRINT" 
{3 UP}";:GoTo520 
IPES="<"THENBO 

PRINT" (DOWN} SAVING ";FS 
"(2 SPACES} {CYN}( SCREE 
N #"sM") (DOWN}" 
OPEN15,8,15:BSAVE (FS) ,B 
9,P(SL(SM)) TO P(SL(SM 
+1000) 
INPUT#15,A,A$,B$,CS:IFA 
<> OTHENPRINTAS:CLOSE15: 
SLEEP1:GOT045 

BSAVE (FS) +"C",BG,P(CL(S 
M)) TOP (CL (SM) +1906) 
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Screen Designer 128 
HH 586 CLOSE15:PRINT"{2 DOWN} 


PX 
KD 


RG 


RK 
EC 


XP 
JE 


SE 


Pc 


BQ 
DD 


FX 


gc 
PA 


QA 


598 
608 


610 


620 
630 


640 
650 


668 


670 


680 
690 


700 


7190 
720 


730 


746 
758 
766 
7716 


788 
798 


868 
810 
826 
830 


840 
850 


860 


870 


880 
890 
900 
9108 


920 


930 


940 
950 


960 





43}SCREEN FILED ON DISK 
«+ -"2SLEEP2:GOTO8G 
REM - LOAD A SCREEN -- 
PRINT" {CLR}{3}"TAB(13)" 
LOAD A SCREEN" 
PRINTTAB(13)"{13 y}" 
"{5 DOWN}" 
PRINT"ENTER WHICH SCREE 
N TO LOAD...":PRINT" 
{CYN}1, 2, 3, 4, OR 5: 
{2 SPACES}{YEL}YOUR CHO 
ICE{RIGHT}--> ( 
GETKEYKS:IFKS="<"THEN8O 
IEVAL (K$) <1ORVAL (KS) >5T 
HENG4@ 
SM=VAL (KS) : PRINT" {HOME} 
£32{8 DOWN}"TAB (36) ;KS: 
IFPR=1THENPR=G: RETURN 
PRINT" (CYN} {DOWN} ENTER 
{SPACE}THE NAME OF YOUR 
SCREEN FILE":PRINT"AND 
HIT {RVS}RETURN{3} 
{OFF}";:INPUT F$:IFLEN( 
F$) >1SORFS=""THENPRINT" 
(3 uP}";:GoT067¢ 
IFFS="<"THENBG 
PRINT" {DOWN}LOADING ";F 
$"{2 SPACES} (CYN}( SCRE 
EN #"sM")" 
TRAP716:0PEN15,8,15:BLO 
AD (FS) ,B15,(SL(SM)) GO 
70728 
PRINT" {DOWN} "DS§:CLOSEL 
5:SLEEP1:GOTO666 
BLOAD (FS) +"C",B15,P(CL( 
SM)) 
CLOSE15:PRINT"{2 DOWN} 
{3}SCREEN LOADED FROM D 
":SLEEP2:GOTO8G 
DISPLAY A SCREEN 




















PRINT" {CLR}"; 
PRINT"{3 DOWN} {3}ENTER 
{SPACE}SCREEN TO DISPLA 
Mewratt 
PRINT"{CYN}1, 2, 
{SPACE}OR 5..." 


3, 4, 


GETKEYKS: IPKS="<"THENSG 
IPVAL (KS) <1ORVAL (K$) >5T 
HENPRINT"{UP}";:GOTO780 
SM=VAL (KS) : IFSM=1THENSM 
= 

SM=SM*2: IFSM=8THENSM=12 
IPSM=10THENSM=16 
IFSM=6THENSM=8 
IFRS=1THENRS=@: RETURN 
PRINT" {CLR}";:POKE183,P 
(SM+1) : POKE184,P (SM+2) 
POKE186,P(SM+3) :POKE187 
7P(SM+4) 
POKE177,@:POKE178,4:POK 
£179 ,G:POKE180,216:BANK 
15:SY¥S3584 
IPAS="5"THENPOKE248 , 255 
:PRINT"{2 HOME}{YEL}";: 
GoTO355 

GETA$: IFAS=""THEN8S80 
IFR2=1THENR2= 
GoToss 
REM -- DISK DIRECTORY - 














PRINT" {CLR} {3} {DOWN} PRE 
SS THE {RVS}NO SCROLL 
{OFF} KEY TO PAUSE":SLE 


EP2 
PRINT" {CLR} {CYN}":DIREC 
TORY 


GOTO 886 
REM -- CHANGE SCREEN CO 
LOR -- 


SC=SC+KU:IFSC>16THENSC= 
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Gs 
GR 


HP 
Mx 
JR 


BK 
sa 


XK 


EP 


AR 
ME 
JK 


HH 


SX 


DA 


HE 
EK 
AH 
AK 


BK 


ac 
EG 


BR 


SK 


co 
MG 


KP 
SE 


EP 


JE 





BB 


EX 


FA 


1 
979 IFSC<1THENSC=16 
988 COLORG,SC:FORI=1T0100:N 
EXT 
996 PRINT" {HOME}";:RETURN 
10606 REM -- FORMAT A DISK - 


1616 PRINT"{2 HOME} (CLR} {3} 
"TAB (13)"FORMAT A DISK 


1020 PRINTTAB(13)"{13 ¥}" 

1636 PRINT"{2 DOWN} {CYN}INS 
ERT DISK AND HIT {RVS} 
{3}RETURN{OFE}" 

1049 PRINT" {HOME} {3} 
{24 DOWN} {12 RIGHT}USE 
< TO ESCAPE {HOME}":FO 
RT2=1T020G:NEXT 

1656 PRINT" {HOME} {3} 
{24 DOWN}{12 RIGHT} 
{15 SPACES} {HOME}":FOR 
T1=1T0100:NEXT 

1068 GETKS:IFKS="<"THENSG 

1676 IFKS<>CHRS (13) THEN1046 

1086 PRINT"{HOME}{24 DOWN} 
{12 RIGHT}{16 SPACES} 
{HOME}" 

1696 PRINT"{6 DOWN} {YEL}PLE 
ASE WAIT..." 

1106 HEADER"SCREEN FILES",I 
1g 

1116 PRINT"{3}{2 DOWN} FORMA 
T COMPLETE" :SLEEP2:GOT 
0926 

1120 REM 
{SPAC! 

1130 PRINT"(CLR}{3}"TAB(13) 
"PILE SCRATCH" 

1140 PRINTTAB(13)"{12 y¥}" 

115@ PRINT"{2 DOWN) (CYN}NAM 
E OF FILE TO SCRATCH 
£3)"; :INPUTFS 

1160 IFLEN(F$)>150RF$=""THE 
NPRINT"{3 UP}";:GOTO1L 
50 

1176 IFFS="<"THENGO 

1186 SCRATCH (FS) :SCRATCH (FS 
)+#"C":PRINT"{2 DOWN} 
43}"F$" FILE SCRATCHED 
":SLEEP2:GOTO8G 

1196 REM -- PRINT A SCREEN 
{SPACE}-~ 

1206 TRAP144G: PRINT" {CLR} 
{3}"TAB(13)"PRINT A SC 
REEN" 

1210 PRINTTAB(13)"{14 ¥}" 

1226 PRINT"{3}{2 DOWN}ENTER 
WHICH SCREEN TO PRINT 
2+-"PRINT"{CYN}1, 2, 
{SPACE}3, 4, OR 5: 
{2 SPACES}{YEL}YOUR CH 
OICE{RIGHT}--> ( )" 

1230 GETKEYKS: IFKS="<"THENS 
6 


SCRATCH A FILE 











1240 IFVAL(KS)<1ORVAL (K$)>5 
THEN1230 

1258 SM=VAL(KS$) :PRINT" 
{HOME}{3}{5 DOWN}"TAB ( 
36) ;KS 

1266 PRINT"{3}{2 DOWN} {RVS} 
T{OFFJEXT MODE OR 

{RVS}G{OFF}RAPHIC MODE 


"4" :GETKEYMS: IEMS< 

NDM$<>"T"THEN1276 

1280 IFM$="T"THENPRINT" 
{CYN} {RVS}4{OFF}@ OR 
{Rvs}8{OFF}@ COLUMN?" 

1296 IFMS="T"THENGETKEYM2S 
TEM2$<>"8"ANDM2S<>"4"T 
HEN1296 

1386 CL=VAL (M2$)*10 





HR 


SE 


AG 


xc 
EX 
HM 
HK 
BK 
FG 


RQ 


QB 
xs 
PP 
GE 
JG 
cc 


Qs 


sG 


AK 


FQ 


PH 
GB 
KC 


HC 


1316 


1328 


1338 


134@ 
1350 
1368 
1378 
1380 
1396 
1466 


1418 
1420 
1438 
1446 
1456 
1460 


1478 


1486 


1490 


1500 


1510 
1526 
1538 
1540 
1556 


1566 
1576 


1580 
1590 
1660 


1618 


1626 
1636 
1640 


1656 


POKE6,4:POKE144,:SYS6 
5457:DV=ST:SYS65454:DV 
=DVORST: IFDVTHEN2176 
PRINT" {CLR}":FAST: TRAP 
144G:CLOSE4:OPEN4,4:A$ 
=CHRS (15) :BS=CHRS (8) :P 
OS=CHRS (16) :IFMS="T"TH 
ENBS$=CHR$ (15) :PRINT#4, 
PEN4, 4,7 
:TD=@:FORI=SL 
(SM) TOSL (SM) +999:GETES 
rIFES="<"THEN144G 
P=PEEK (I) :1FP>128THENR 
0=1:P=P-128 
IFP=34THENPRINT#4,"'"; 
:GOTO1426 
IEP<320RP>95THENP=P+64 
:GOTO1390 
IEP>63ANDP<96THENP=P+3 
2:G0T01399 
IEP>31ANDP<64THEN1396 
PS=CHR$ (P) : IFRO=1THENR 
0=G: PS=CHRS (18) +CHRS (P 
) +CHRS (146) 
IEM$="G"ORCL=4GTHENPRI 
NT#4,A$;P0$"20";PS;BS; 
:GOTO1426 
PRINT#4,A$;PO$"G0"; PS; 
BS; 
TB=TB+1: IF TB=CLTHENPRI 
NT#4:TB=6 
NEXT 
PRINT#4:CLOSE4: SLOW 
GoToas 
REM -- CODE A SCREEN - 








PAST: TRAP2120: PRINT" 
{2 HOME) (CLR}":p1l=sL(s 
M) :AV=392LX (K) =LN: EN (K 
) =LN: K=K+1 
PRINT"{CLR}{6 DOWN}":P 
L=1313:RV=6:PS=PL+27:A 
D=40:D2=D1+40:IFAV=104 
OTHENSG 

PRINTTAB (PX) ;LN"?2"+CHR 
$ (34) :TPAV=39THENPRINT 
"({UP}";TAB(PX) ;LN;"2CH 
RS (27) +"CHRS (34) ;"M"ZC 
HRS (34) 7 "5 ";CHRS (34) +C 
HRS (147) :PL=PL+14:AV=4 
6 

EEK (D1) :CP=D1+1000: 
EEK (CP) : IFP=34THENP 





=39 
IFC>16THENC=C-16:GOTOL 
516 
IEP<129ANDRV=1THENGOTO 
1656 
IFP>128THENP=P-128:GOT 
01630 
IFP=32ANDRV=GTHEN1586 
IEKC(C) =LTHEN1580 
IFC=OTHEN1696 
ONCGOTO1706,1710,1720, 
1730,1740,1750,1680,17 
60,1776,1780,1796,1816 
,1820,1830,1840 
POKEPL,P 

GETKS: IFKS="<"THEN2126 
D1l=D1+1:PL=PL+1:1FD1=D 
2THENPOKEPL, 34:GOTO188 
6 





IFPL>PSTHENPOKEPL, 34:P 
OKEPL+1,59:PL=1313+AD: 
AD=AD+40:LN=LN+2: PS=PL 
+27:GOTO1496 

GOTO1588 
IFRV=1THEN1540 

RV=1: POKEPL, 146: P=P+12 
8:PL=PL+1:GOTO1660 
RV=G: POKEPL, 21: PL=PL+ 
1 





BQ 


KB 
XE 


CK 


BC 


HX 


MK 


BH 


BH 
cG 


RE 


EP 
FQ 
RP 


EM 


PQ 


AX 
Qu 
BE 


1666 
1670 
1686 
1696 
1766 
1716 
1726 
1736 
1746 
1756 
1766 
17768 
1780 
1798 
1868 
1810 
1820 
1836 
1840 
1858 


1866 
1876 
1880 


1890 
1906 
1916 


1926 


1938 


1940 


1958 


1966 


1976 
1986 


1996 


2000 
2018 


2628 


2038 


2040 


2050 * 
2068 


2078 


IFPL>PSTHEN1616 
GOT01538 
XX=222:GOT01850 
XX=208:GOTO1859 
XX=133:GOTO1850 
XX=156:GOTO1850 
XX=223:GOTO1850 
XX=220:GOTO1850 
XX=158:GOT01850 
XX=159:GOTO1850 
XX=193:GOT01850 
XX=213:GOTO1850 
XX=214:GOT01850 
XX=215:GOTO1858 
XX=216:GOTO1850 
XX=216:GOT01850 
XX=217:GOT01850 
XX=218:GOTO1850 
XX=219 
POKEPL , XX: FORI=@TO1 
C(I) =0:NEXT:KC(C)=1:PL 
=PL+1 
IEPL>PSTHEN1610 
GOT01530 
PRINT" {HOME} (13 DOWN}G 
0701480"; :D1=SL (SM) +AV 
sAV=AV+403 LN=LN+2: POKE 
208,7:FORI=84270849: PO 
KEL, 13:NEXT: PRINT" 
{HOME} {2 DOWN}":STOP 
PRINT" {CLR} {3}"TAB (13 
"CODE A SCREEN" 
PRINTTAB (13)"{13_ ¥}" 
PRINT" {CYN} {DOWN} LINE 
{SPACE}#'S USED... 
{DOWN}":LX (K-1) =LN 
FORI=1T05:COLORS, I+2:P 
RINTLN (I) “TO"LX (I) :NEX 
1: IPK>STHENPRINT 
{DOWN} (CYN}YOU HAVE RE 
ACHED FIVE SCREENS!":S 
LEEP2:GOTO8G 
PRINT" {DOWN} {CYN}ENTER 
STARTING LINE NUMBER. 
" 











PRINT"MUST BE {RVS}{3} 
LARGER{CYN)} {OFF} THAN 
{SPACE}2999 AND {RVS} 
{3}SMALLER{CYN} (OFF} 
{4 SPACES}THAN 66000! 
{3} "2LN=0 

PX=0:ZS="": INPUT LNS:L 
N=VAL (LNS) : TELNS="<"TH 





EN8O 
IFLN<300GORLN>59999THE 
N1890 
IFLN¢100GOTHENPX=1 
PRINT"(5 UP}"+CHRS (27) 
anan 

PRINT"{3}ENTER WHICH S 
CREEN TO CODE... 

{6 SPACES}":PRINT" 
{CYN}1l, 2, 3, 4, OR 5: 
{2 SPACES}{YEL}YOUR CH 
OICE --> () " 
GETKEYKS$: IPKS="<"THENB 


g 

IEVAL (K$) <1ORVAL (K$) >5 
THEN2060 
SM=VAL (KS) : PRINT" 
{HOME}{3}{12 DOWN} "TAB 
(36) ;KS 

PRINT" {2 DOWN} {YEL}WHE 
N READY, PRESS A KEY." 
PRINT" THE COMPUTER WIL 
L GO INTO {RVS}FAST 
{OFF} MODE..." 
PRINT"THE SCREEN WILL 
{SPACE}BLANK." 
PRINT"IF DURING THE CO 
DING PROCESS YoU" 
PRINT"DECIDE TO ABORT 


HK 
AB 


SE 


HI 


JB 


cc 


EH 


ss 


BE 


RE 


xD 


2686 


2690 
2166 


2110 
2120 
2130 


2146 


2150 
2166 


2170 


2180 
2190 
2266 


2210 


2220 


2238 


22490 


2259 


2260 


2278 


2288 


2298 


23608 


{SPACE}THEN PRESS {3}< 


PRINT"{YEL}AND THE COM 
PUTER WILL RETURN TO T 
HE" 

PRINT"MAIN MENU. {HOME} 


GETKEYAS: IFAS="<"THENL 
N=LX (K-1) :GOTO8 
GOT01476 
K=K-1:LX(K) =LN 

PRINT" {CLR}":IFED=1THE 
NED=G:LN(K) =@:LX (K)=@: 
GOTO8S 

PRINT" {HOME} {7 DOWN}"; 
:FORI=1T06: PRINTLN (K) ? 
LN (K) =LN (K) +2: TFLN (K) + 
2>LX (K) THENED=1:GOTO21 
68 

NEXT 

PRINT" {HOME} {13 DOWN}G 
0702130"; : POKE2G8,7:FO 
RI=842T0849:POKEI,1 
EXT: PRINT" {HOME} 

{2 DOWN}":STOP 
PRINT" (2 HOME} (CLR}{3} 
{2 DOWN} {RVS}PRINTER I 
S NOT ONLINE... {OFF} C 
ORRECT AND HITANY KEY. 
{2 SPACES} {CYN}HIT {3} 
RUN/STOP {CYN}FOR MENU 
:GETKEYD4$:GOTO8S 
REM -- GET READY -- 
DIMLNS (5,5) 
FORI=1T05:READD1,D2:SL 
(1) =D1:CL (1) =D2:NEXT 
DIMP (26) :FORT=1T020:RE 
ADD: P(I) =D:NEXT:FORI=1 
TOB: KEY (I) ,""sNEXT 
FORI=3584T03709+READDT 
:POKEL, DT :NEXT:K=1:FOR 
1=2048T02694:READDT: PO 
KEI, DT: NEXT? SYS2048:GO 
71080 

DATA 8192,9192,10192,1 
1192,12192,13192,14192 
15192, 4864,5864 

DATAG , 32, 232,35, 208,39 
+184,43,160,47,136,51, 
112,55,88,59,0,19,232, 
22 

DATA 162,6,160,0,165,1 
83,133,167,165,184,133 
,168,165,186,133,170,1 
65,187,133,171,165,177 
1133,172,165,178,133,1 
73,165,179,133,174,165 
+188,133,175,132,199 
DATA 132,200,177,167,1 
45,172,177,176,145,174 
+24,165,167,105,1,133, 
167,165,168,105,0,133, 
168,24,165,170,105,1,1 
33,170,165,171,105,0,1 
33,171,24,165,172,105 
DATA 1,133,172,165,173 
+105,G,133,173,24,165, 
174,165,1,133,174,165 
175,105,6,133,175,24,1 
65,199,105,1,133,199,1 
65,200,105,0,133,200,1 
65,200,201,3,208,177 
DATA 165,199,201,232,2 
68,171,96 

DATA 126,173,20,3,141, 
25,8,173,21,3,141, 26,8 
,169,27,141,20,3,169,8 
,141,21,3,88,96,161,25 
G,165,212,201,59,246,4 
+201,6,208,6,169,0,133 
1244,133,245,108,25,8 
DATA 128 & 





























Save Your 
Copies of 
GAZETTE 


Protect your back issues of 
COMPUTE!’s Gazette in durable 
binders or library cases. Each 
binder or case is custom-made 
in pine green binding with 
embossed white lettering. Each 
holds a year of Gazette. Order 
several and keep your issues of 
Gazette neatly organized for 
quick reference, (These binders 
make great gifts, too!) 


Binders: 

$9.95 each 
3 for $27.95 
6 for $52.95 


$7.95 each 
3 for $21.95 


6 for $39.95 


CALL TOLL FREE 
7 days, 24 hours 
1-800-972-5858 


(Add $1.00 per case/binder for postage 
‘and handing. Please add $2.50 per unit 
for orders outside the U.S.) 


Send in your prepaid order with the 
attached coupon, 


Mall to: Jesse Jones Industries 
Dept. GAZ 
499 East Erie Ave. 
Philadelphia, PA 19134 


Please send me. GAZETTE 
Qcases (binders, Enclosed Is my 
check or money order for $. 

(WS. funds only.) 


State. 


Satisfaction guaranteed or money refunded, 
Please allow 4-6 weeks for delivery, 
No. P.O. Box Numbers, Please: 
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Have you experienced 
problems while working 

with external devices? 

This utility banishes 
unfriendly device numbers 
on both the 64 and the 128, 


The Commodore 64 did a lot to popu- 
larize low-cost disk drives and printers. 
Unfortunately, these devices are not al- 
ways user-friendly, In fact, working 
with the different device numbers com- 
mon to disk drives, printers, and cas- 
sette drives can be a major source of 
frustration. 

Take the load command, for in- 
stance. When the 64 was introduced, 
Commodore had no idea that disk 
drives would become as popular as 
they are today. Instead, the company 
thought that most 64 owners would opt 
for the cheaper cassette drives. That's 
why LOAD and other commands de- 
fault to this device. 

Things are even worse when you 
have multiple disk drives or two print- 
ers. When you try to load files from 
your new 1581 disk drive, you need to 
append “,9” to the load command. To 
output to a second printer (device 5), 
often you must unplug the printer and 
then plug it back in at least once before 
you're successful. 
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With Alias, you can eliminate these 
and other problems. This program lets 
you change the device number as- 
signed to any device; commands that 
you issue are now redirected to the de- 
vice of your choice. For example, you 
can redefine device 8 as device 1 so that 
the load command defaults to the disk 
drive instead of the cassette drive. Simi- 
larly, you can change device 8 to device 
9 so that the files on your second disk 
drive load properly and 128 DOS com- 
mands like SCRATCH work without a 
“U9” appended to the end of them. 


Getting Started 

Although Alias is written in machine 
language, it’s listed here as a BASIC 
loader that runs on both the 64 and the 
128. To ensure accurate typing, use The 
Automatic Proofreader, found elsewhere 
in this issue, to enter the program. If 
you intend to use the program with a 64 
only, enter lines 10-350. If you plan to 
use Alias on a 128 as well, enter the en- 
tire program; be sure to type it in from 
128 mode so that any BASIC 7.0 key- 
words will be tokenized properly. 

When you run Alias, some general 
instructions and a list of valid device 
numbers are displayed. The machine 
language is then POKEd into memory 
and activated. 

Once Alias is enabled, you can 
change device numbers from immedi- 
ate mode or from program mode. To re- 
assign a device number on the 64, enter 


POKE 780,A:POKE 781,B:SYS 53000 


where A is a device’s default number 
and B is the number you'd like it to 
have. To reassign a device number on 
the 128, use a command with the syntax 


SYS 6900,A,B 





where A and B have the same meanings 
as in the 64 command. To restore a de- 
vice’s number, simply set both A and B 
to the default for the device, 

In its present form, Alias does not 
reassign any device numbers when it’s 
run. However, you can cause it to do so 
by changing the second value in each 
pair of numbers in line 350. The first 
number in each pair is the default num- 
ber for each device; the second number 
is the device number that will be as- 
signed when you run the program, If 
you modify this line, be careful not to 
assign the same number to two or more 
devices. 

For example, suppose you wished 
to change device 8 to 10 and device 9 to 
8. To do this, you’d add the following 
line to the program: 


350 DATAO,0,1,1,2,2,3,3,4,4,5,5,8,10,9,8 


Finally, to disable Alias, restoring 
the default device numbers in the pro- 
cess, press the RUN/STOP-RESTORE 
key combination. To reenable the 64 
version, type SYS 53052; to reenable 
the 128 version, type SYS 6952. 


Allas 

HQ 16 REM COPYRIGHT 1990 ComPU 
TE! PUBLICATIONS, INC. - 
ALL RIGHTS RESERVED 
M=1:PRINT" {CLR} {RVS} "TAB 
(15) "ALIAS": IFPEEK (65530 
) =STHENM=2:BANK15 
PRINT" {2 DOWN}THIS PROGR 
AM ALLOWS YOU TO DIVERT 
{SPACE ALL" 

PRINT"INPUT OR OUTEUT FR 
OM ONE DEVICE Q 
PRINT"ANOTHER. 
NPRINT 
PRINT"USE THE COMMANDS: " 
+ EM=1THENPRINT"POKE786, 
A:POKE781,B:SYS53000":GO 
T08a 


RB 20 


ER 3! 


GH 40 





FQ 5 


IFM=2THE 


KD 60 














QA 7@ PRINT"SYS6900,A,B" MF 246 DATA191,207,136,76,50,2 HC 398 RESTORE350:FORI=7086T07 
HP 80 PRINT"WHERE A = THE CURR 07,208,200,192,19,208,2 101:READQ:POKEI,Q:NEXT 

ENT DEVICE # AND":PRINT" 25,173,191,207 PJ 400 SYS6952:REM ACTIVATE 

B = THE NEW DEVICE #." XQ 250 DATA172,192,207,174,193 PG 416 DATA141,171,27,142,173, 
EM 90 PRINT" {DOWN}TO MAKE A AN 7207,96,173,26,3,141,18 27,140,172,27,160,3,185 

D B THE SAME AGAIN, TYPE 3,207,173,27 7171,27,205 

ny MA 260 DATA3,141,184,207,169,1 RS 420 DATA171,27,268,17,173,1 
PC 100 IFM=l1THENPRINT"POKE780, 27,141,26,3,169,207,141 71,27,153,171,27,200,17 

8:POKE781,8:SYS53000":G 227,3,173 3,173,27,153 

0T0120 CK 270 DATA48,3,141,186,207,17 HX 430 DATA171,27,136,76,30,27 
ED 3,49,3,141,187,207,169, 7 200,200,192,19,208,225 
AM 120 PRINT"{DOWN}VALID DEVIC 133,141,48 7173,171,27 

E NUMBERS ARE: {DOWN}" BS 280 DATA3,169,207,141,49,3, CD 440 DATA172,172,27,174,173, 
BE 13@ PRINT"@ - KEYBOARD 173,50,3,141,189,207,17 27,96,173,26,3,141,163, 

{3 SPACES}4 - PRINTER 1 3,51,3 27,173,27 

Ly PF 290 DATA141,196,207,169,139 ES 450 DATA3,141,164,27,169,10 
JS 146 PRINT"1] - CASSETTE 7141,50,3,169,207,141,5 7,141,26,3,169,27,141,2 

{3 SPACES}5 - PRINTER 2 1,3,96,32 743,173 

a IX 360 DATA1L45,207,76,182,207, GC 460 DATA48,3,141,166,27,173 
FH 158 PRINT"2 - RS232 32,145,207,76,185,207,3 749,3,141,167,27,169,11 

{6 SPACES}8 - DISK DRIV 2,145,207,76 3,141,48 

jie QJ 310 DATA188,207,141,191,207 DK 470 DATA3,169,27,141,49,3,1 
EK 160 PRINT"3 - SCREEN +146,192,267,142,193,26 73,56,3,141,169,27,173, 

{5 SPACES}9 - DISK DRIV 7,166,3,185,191 51,3 

EB 2" QD 326 DATA267,197,186,208,10, XK 480 DATA141,176,27,169,119, 
SC 170 IPM=2THEN370 200,185,191,207,133,186 141,50,3,169,27,141,51, 
JC 188 FORJ=53000T053185:READQ 1136,76,50,207 3, 96,32 

:X=X+Q: POKEJ,Q:NEXT RH 330 DATA200,200,192,19,208, RQ 496 DATA125,27,76,162,27,32 
RJ 196 IPX<>26532THENPRINT"ERR 233,76,50,207,76,189,23 ,125,27,76,165,27,32,12 

OR IN DATA STATEMENT.": 9,76,108,242 5,27,76 

STOP FH 340 DATA76,78,245,0,0,0 EK 560 DATA168,27,141,171,27,1 
SG 206 FORI=53186T0532@1:READQ JM 350 DATAG,G,1,1,2,2,3,3,4,4 46,172,27,142,173,27,16 

:POKEI,Q:NEXT 15,5,8,8,9,9:REM ASSIGN @,3,185,171 
MX 210 SYS53052:END:REM ACTIVA DEVICE NUMBERS FD 51@ DATA27,197,186,208,10,2 

TE AH 368 REM 128 ONLY 00,185,171,27,133,186,1 
FF 220 DATA141,191,207,142,193 XC 370 RESTORE410:FORJ=6900TO7 36,76,30,27 

1207,140,192,207,160,3, @85:READQ:X=X+Q:POKES,Q BP 520 DATA2GG,200,192,19,208, 

185,191,287,265 NEXT 233,76,30,27,76,189,239 
EJ 236 DATA191,267,208,17,173, CG 38@ IFX<>19532THENPRINT"ERR 176,108,242 

191,207,153,191,267,208 OR IN DATA STATEMENT.": AD 536 DATA76,78,245,0,9,0 


,173,193,267,153 


STOP 





TAXPERFE 


™ Get TaxPerfect™ now and 


relax on April 15th... 


© SEVENTH SUCCESSFUL YEAR! * MANY THOUSANDS ALREADY IN USE! 
© Your Simple Answer to the Tax Reform Act of 1986 (As Amended) 


+ TaxPertect is the quick, correct, easy way to do your taxes * Absolutely up-to-date with the Tax Reform 
Act of 1986 and all new tax changes * Simplest tax return preparation program available — at any 
price* Single-keystroke form-to-form change* Automatically calculates and transfers data from 
every FORM and Schedule to FORM 1040* Simply answer the questions — TaxPertect calculates return, 
tax due or amount of refund due yous Automatically elects the greater of Standard or Itemized 
deductions Prints data to all FORMS or Schedules you need for your complete return — ready to 
sign and file* Highly acclaimed by tax pros, CPA's and tax preparers, TaxPerfect is easy to understand 
and a pleasure to work with. Available for Commodore 64 and Commodore 128 
+ TaxPertect is fully screen-prompted, menu-driven —* TaxPerfect data files can be stored on disk. 
and easy to use, System includes comprehensive * TaxPerfect yearly updates are available at 
User's manual with helptul tutorial example. 50% discount to registered TaxPerfect users. 
* With a single keystroke, TaxPerfect instantly recalcu- * TaxPerfect is an essential addition to your 
lates your entire return when you change any item. personal software library — and best of all, 
* TaxPertect also prints directly onto IRS forms. it's tax deductible. 


TAX PLANNING RETURN PREPARATION 


* Most powerful program features available—at _TaxPerfect PRINTS THE INCOME TAX 
any price* Supports RAMdisk* Prints the input RETURN FOR YOU: TaxPertect 64— prints 


FULL-FEATURED 
DEPRECIATION 
SUPPORT 


sheets to organize your data* Built-in calculator 
feature accumulates input and enters total * 32 
PF key functions achieved with 1 or 2 keystrokes 
* Fast, complete tax calculations — 20 forms in 
under 2 seconds (most returns in under 1 second) 
* Oncline pop-up Help menus * Full calculation- 
override capability* Follows IRS text & line #s 
exactly * Exclusive context-sensitive Datachek™ 
pinpoints omissions —and alerts you to effects of 
your input* Our exclusive Current Values Display 
constantly reflects all changes with your input* In 
Planning Mode all unnecessary text input prompts 
are eliminated, Only numeric input is prompted for. 
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page 1 & page 2 of the FORM 1040 and 
Schedules A,B.C,D,E and SE as well as. 
FORM 2441, 3903 and 6251 on standard IRS 
government forms or on blank computer 
paper for use with transparent overlays 
TaxPertect 128 —supports all of the above: 
forms plus Schedules F and R and FORMS 
2106, 2119, 2210, 3800, 4136, 4255, 4562 and 
4684. All other forms and schedules are 
considered in the calculation. TaxPerfect 
features direct screen input using fast ten- 
key style on the Commodore 128. 


Complete 1989 Edition: 


TaxPertect 64589 


Self-contained Depreciation program 
calculates and prints complete listing of 
depreciable assets . . . allclasses . . . 
length life . . . traditional methods pius “old” 
rules, ACRS, MACRS. ..Half-year, mid-quarter 
& mid-month conventions. Schedule of assets 
attaches as a detailed, printed supplement to 
the FORM 4562 


Commodore 


TaxPerfect 128899 
TO ORDER Call Toll Free 1-800-525-5611 24 Hrs. from anywhere outside Dallas. In Dallas Call 214/386-6320, mastercar, 


VISA, Money Orders, Bank Checks and COD Orders Accepted (add 3% surcharge for credit card processing) (Texas residents add 8% sales tax) (add $5.00 for COD) ($5.00 Shipping) 
Financlal Services Marketing Corporation* 500 North Dallas Bank Tower* 12900 Preston Road Dallas, Texas 75230 
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Storm Across Europe Gauntlet 1! thor, Thyra, 
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Design your own offers lots of fun p. 63 


complete arcade game p. 62 
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new games from the land down 
under p. 63 
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Storm Across Europe 


Storm Across Europe recreates war on a 
grand and unprecedented scale. Its 
sweep is far-reaching, encompassing 
the European theater of operations in 
World War II in its entirety, from the 
mountains of Morocco in the west to 
the edge of Siberia in the east. 

The design itself embraces practi- 
cally every important facet of the con- 
flict. You can undertake Battle of 
Britain-type strategic-bombing cam- 
paigns, send German raiders to prey on 
Allied shipping in the Atlantic, and 
even devote resources toward gaining 
the technology to build the first atomic 
bomb, It’s all here in impressive detail. 





Despite its depth and breadth, 
Storm Across Europe rates no more than 
average in complexity because of some 
judicious abstractions and simplifica- 
tions. Taken individually, the land, air, 
naval, and economic subsystems are 
very basic both in their specifics and 
their applications. But it’s the interac- 
tion of these subsystems that makes the 
game a sophisticated, compelling simu- 
lation of the 1939-45 war in Europe. 

The sheer scope of decision mak- 
ing the game requires is sometimes 
daunting, especially as the war expands 
into North Africa, Russia, and Asia. 
Fortunately, the system for entering or- 
ders simplifies the process considera- 
bly. Whenever you initiate an action, a 
set of prompts or markers appears on 
the screen, indicating your range of op- 
tions. For instance, when an army 
moves to a port, the computer informs 
you whether enough transports are pre- 
sent to embark the unit. It also marks 
every port that could serve as a legal 
destination for the ships. In this way, 
the friendly user interface lightens your 
responsibilities, freeing your mind to 
concentrate on strategy rather than on 
specific rules. 

For the most part, Storm Across Eu- 
rope addresses its subject from a strate- 
gic perspective. Turns equal three 
months, and units represent armies or 
fleets of ships and planes. In keeping 
with this scale and focus, most of the 
game’s mechanics are straightforward: 
You move; then you fight. However, 
simple in design does not mean simple 
in execution. A range of factors affect 
the outcome of land battles, including 
terrain, troop efficiency, air support, 
and supply. The routines for resolving 
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naval combat follow an even more intri- 
cate sequence, with land-based air sup- 
port, submarines, fleets, and escorts all 
converging in battle as convoys attempt 
to pass through different sea areas. 

The one place where the game errs 
is in its treatment of movement. The 
rules allow you to redeploy your units 
across friendly territory without restric- 
tion and attack in the same turn. Now, 
this would be fine if all of Europe had 
been serviced by unlimited high-speed 
trains. But seeing as how this wasn’t so, 
the freewheeling maneuvers the game 
lets you carry out are blatantly unrealis- 
tic, even by modern standards. 

Questions of realism aside, in 
game terms, the lack of limitations on 
an army’s ability to move and fight de- 
tracts from play in two ways: It greatly 
reduces the importance of planning and 
squelches the effects of surprise. 
Caught off-guard by an Allied invasion 
of France while mired in your own of- 
fensive in the Ural Mountains? No prob- 
lem. The flick of a joystick transfers a 
half-dozen armies across the continent 
and drives the invaders back into the 
English Channel. Historically, if the 
Germans had possessed this capability 
to shift troops between fronts, they 
probably would never have lost the war. 

Like many of the other war games 
published by Strategic Simulations, 
Storm Across Europe is built around an 
extensive database. In fact, the game al- 
most buries you beneath an avalanche 
of numbers, For example, the map is di- 
vided into more than 200 land areas, 
each of which is rated for population, 
raw material, industry, garrison, and air- 
defense levels. Armies, in turn, are made 
up of varying quantities of infantry, 
mechanized troops, armor, paratroops, 
and tactical air points. Get the idea? 

Manipulating all these numbers 
can grow tiresome after a while and 
leave you feeling more like an accoun- 
tant than a general. The key to enjoying 
and appreciating Storm Across Europe, 
then, is to keep in mind the larger pic- 
ture. The game depicts a continent 
engulfed by war, and you should con- 
struct your strategies in the same broad 
context and not concern yourself with 
smaller details. 

Although the design is not without 
its flaws, Storm Across Europe achieves 
perfection in fulfilling its intent. The 
game integrates the economic and mili- 
tary aspects of World War II in a clean, 
engaging format that simultaneously 
entertains, instructs, and challenges you. 

—Jeff Seiken 


Storm Across Europe 
Strategic Simulations 
Distributed by Electronic Arts 
1820 Gateway Dr. 

San Mateo, CA 94404 

$59.95 


Gauntlet Il 


Assuming multiple personalities may 
be considered unusual in some circles, 
but in the fantasy world of computer 
gaming it’s most desirable—and down- 
right fun. Mindscape’s Gauntlet II al- 
lows players to assume the roles of four 
heroes, each with different powers and 
capabilities. 

Just as they fought against the 
forces of evil at your local arcade, Thor 
the Warrior, Thyra the Valkyrie, Ques- 
tor the Elf, and Merlin the Wizard in- 
vade your personal computer to 
continue their noble adventures. 








A single player, or a second player 
acting as an ally, assigns any of the four 
heroes as his or her alter ego. Once 
selected and empowered with unique 
abilities, the players wade into a villain- 
ous horde of monsters and evil traps 
that occupy 100 new mazes of the Dark 
Dungeons. 

If you enjoy arcade-style games, 
Gauntlet II will consume you with fast- 
paced shoot-‘em-up action and mind- 
bending puzzles. Time flies as players 
delve deeper and deeper into the dun- 
geon world. Trying to quit playing is 
the most difficult part of Gauntlet II. 

Players begin the game with 2000 
health points as they search the mazes 
for treasure and instruments of magic. 
Time erodes a player's health as do en- 
counters with any of the seven types of 
monsters that swarm to attack. Destroy 
the monsters and the Generators (the 
machines that mass-produce them) 
before you are overwhelmed. Acid 
puddles, force fields, and traps that can 
sap your strength should also be avoid- 
ed, if possible. 

Each level of the maze must be 
solved and an exit found before players 
may advance to the next level. Food 
and cider, found along the way, extend 
your life by adding 100 health points to 
your score. 

Your session comes to an end 
when your health drops to 0, You must 
then restart the game from the begin- 
ning. When two players tackle the 
game together, however, there are defi- 
nite advantages. The most obvious is 
the ability to protect one another by 
using each player's respective talents 
against a diverse group of villains and 
threats. Another important advantage 
is the ability to rejoin your partner after 
your health points have expired, As 
long as one player continues to hold his 
or her own against the horde, the com- 
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panion may return to the fray at the 
present level, rejuvenated with 2000 
health points. 

Players may pick up and carry only 
a limited number of items as they trek 
about the game. Keys are very useful, as 
are the powerful magic potions and am- 
ulets, Use the keys to eliminate barriers 
that prevent your movement inside the 
mazes. Amulets and potions, once 
found, increase your powers in magnif- 
icent ways. 

Treasure rooms appear randomly, 
allowing players to sprint around, 
scooping up as much treasure as possi- 
ble. To keep the treasure, they must 
find the exit and escape to the next level 
before time runs out, Phony exits and 
poisoned food, cider, and potions add 
an extra element of danger and can 
prove fatal to the unwary. 

A long list of foes stand against you 
in Gauntlet I]. The most formidable are 
characters known simply as Death. 
They will try to attach themselves to 
the heroes, drain up to 200 health 
points from their victim, and then die 
themselves. Fighting Death characters 
hand-to-hand or shooting at them is 
useless, Only certain magic potions can 
rid the screen of these dreaded leach- 
like monsters, 

Gauntlet II is just what the wizard 
ordered for home dungeon-arcade ad- 
dicts, It’s a quality arcade-style action 
game that exercises the brain as well as 
the wrist and thumb. The option to as- 
sume a different hero’s persona with 
different abilities each time you play 
spices up an already challenging 
adventure. 

—Steve Hedrick 


Gauntlet II 
Mindscape 

3444 Dundee Rd. 
Northbrook, IL 60062 
$29,95 


Shoot 'Em Up 
Construction Kit 


Let's face it. Within even the most seri- 
ous-minded, efficient, hard-working, 
dedicated computer user lurks a tiny 
gremlin whose only desire is to get out 
and shoot, bomb, blast, and otherwise 
annihilate anything in its path. 

Some people have no problem in- 
dulging this imp’s appetite. Others of 
us sidle along the aisle and grab a 
shoot-'em-up off the shelf, telling the 
cashier, “It’s for the kids.” We wear 
trenchcoats and oversized fedoras as 
we slouch into arcade rooms to drop 
some quarters. Or we order games in 
plain brown wrappers from anony- 
mous distributors in Paducah. After all, 
we wouldn’t be caught dead using our 
computer to play! 
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Enter Avantage. Now we have a 
legitimate excuse to roam through 
strange landscapes blasting away at 
purple aliens or enemy armies. Shoot 
‘Em Up Construction Kit, which comes 
with three ready-to-play games, en- 
ables us to design our own games of 
destruction, And what good game de- 
signer doesn’t check out his or her own 
creation? 

Any game you create with Shoot 
‘Em Up Construction Kit will be com- 
plete with hero, enemies, weapons, and 
sound effects, There’s even a screen 
where you can write an introduction to 
your hot new game for uninitiated 
players, Since it takes time to create one 
of these games, you can save your cre- 
ation at any stage. When you've fin- 
ished designing your game, save it to its 
own disk and it will run independently 
of Construction Kit (a great gift for your 
fire-happy friends). 





Now we have a 
legitimate excuse to roam 
through strange 
landscapes blasting away 
at purple aliens or enemy 
armies. 





You can either jump right in creat- 
ing your game from scratch or get your 
feet wet by revising the games includ- 
ed: Space Hawk, Outlaw (a Western 
shoot-‘em-up), and Transputer Man. 
Either way, this kit is a powerful tutori- 
al in game design. 

The Main Menu is your doorway to 
creation. The various editors are all 
accessed from here. These include edi- 
tors for sprites, objects, background, 
sound effects, player limitations, attack 
waves, levels, and the front end, Test 
Game, also listed on the main menu, al- 
lows you to test your game in either 
Regular mode or Cheat mode, the latter 
of which gives you an infinite number 
of lives, 

A computer game is laid down in 
layers, rather like an animated cartoon. 
Pixels comprise characters, which make 
up blocks; blocks, in turn, combine to 
become the background. Other pixels 
make the sprites that make objects— 
objects being a hero, an enemy, an ex- 
plosion sequence, or anything that 
moves. Sound effects are assigned and 
can themselves be modified in terms of 
waveform, pitch, attack, and decay. 

Players’ limitations are defined. 
Enemies are placed and assigned routes 
of travel. The map areas and pattern of 
playing levels are chosen—scrolling 
versus still screen versus push screen 


(forward movement governed by the 
hero's action). Then the introduction 
and its special effects provide the fin- 
ishing touches. 

With Shoot ‘Em Up Construction Kit, 
you are guided through the intricate 
process of layering and building until 
you have produced a finished game of 
reasonable arcade quality. Each compo- 
nent is available to you for design or 
modification, You have complete control. 

A fascinating aspect of Construc- 
tion Kit becomes apparent when you 
toy with one of the existing games. 
Gradually modify pieces of it and then 
check it out to see where the changes 
turn up. Since everything is made of 
linked components, changes you make 
can turn up in weird places as a modi- 
fied character or sprite is incorporated. 
This is a great way to learn your way 
around this program, but the first time 
you see the consequences and the capa- 
bilities of what you're working with 
strike home, it’s awesome. 

Criticisms of this program are few. 
Depending on the make of your moni- 
tor, your screen may not be large 
enough to display the score (lower left 
border) or a couple of prompts used in 
one of the editors, This was true of our 
Commodore 1701. The character set 
used in writing the front-end text can be 
modified. However, there are some 
characters that we had trouble figuring 
out how to get on the screen. Pressing 
the logical keys didn’t work, and there 
is nothing that tells you how to reach 
them. We never did get the hyphen. 

The only general drawback to this 
kit is that the block-and-pixel nature of 
game construction limits you to a fairly 
geometric, even linear, design, For in- 
stance, we found it extremely difficult 
to design a curved stretch of road. 
(Heck, we found it impossible, but 
that’s not to say that an extremely tal- 
ented game maker couldn’t do it.) Ev- 
erything else in the kit is great, and to 
reuse a word, awesome, 

Shoot ‘Em Up Construction Kit, 
while setting out to be a toolkit for en- 
tertainment, is actually a deep program 
that helps you explore and gain com- 
mand of the intricacies of game making. 
We played the games. We toyed with 
the editors. And while we may never 
have the dedication and patience it 
takes to painstakingly construct a com- 
mercial shoot-em-up, we now have a 
better understanding and respect for 
the game designers who do. 

—David and Robin Minnick 


Shoot ‘Em Up Construction Kit 
Avantage 

Distributed by Accolade 

550 Winchester Blod. 

Suite 200 

San Jose, CA 95128 

$14.95 > 


World Geography 


A program is good when it does what it 
sets out to do. If it does it smoothly, 
uses eye-catching graphics and tuneful 
responses, and does it with a minimum 
of fuss, then it is elegant. This may be 
an unusual statement about an educa- 
tional package, but elegant is the word 
that best describes World Geography 
from Bobco, 

The program sets out to help you 
learn some essential facts about 175 of 
the world’s nations, These facts include 
the country’s location, capital, curren- 
cy, official language, and population, 
Considering the changing political 
boundaries and population figures, it is 
laudable that Bobco periodically issues 
updated versions of World Geography. 
(These can be purchased direct from 
Bobco by current owners for just $7. 
The 1990 version should be available 
early this year.) 

Any student will tell you: Memo- 
rizing facts is b-o-r-i-n-g! Any teacher 
will tell you that some things can’t be 
learned any other way. The solution? 
Make the dull as interesting as possible, 
use multiple stimuli, keep the brain ac- 
tive. Nothing stimulates like a game— 
whether you're playing against an op- 
ponent or merely pitting yourself 
against a previous score. World Geogra- 
phy is a package made-to-order to these 
specifications. It uses multiple-choice 
questions, visual aids in the form of 
maps, a simple but accurate rotating 
globe, and aural stimuli in the form of 
music played while the globe spins and 
when questions are answered. 

Options to be selected at the outset 
include 1-Player, 2-Player, or Review 
(answers automatically displayed); 
Novice, Intermediate, or Expert; and 
Geographic Area: America & Pacific, 
Eurasia, Africa, and All. 

The globe rotates in a window on 
the right side of the screen, As it spins, 
the disk drive searches for a country, 
When one is found, the globe halts with 
the continent of the selected country 
facing front. A relief-type map of the 
country appears on the left, with its flag 
displayed nearby. A blinking light lo- 
cates the capital city on both the globe 
and the map. 

The first question asked is the 
name of the country. The other four 
questions—capital, language, currency, 
and population—follow in random or- 
der, Three possible answers are offered 
for each, 

Scoring is based on how long it 
takes you to answer. A timer starts as 
each question comes up. The quicker 
you answer, the higher your score. 

You begin with five countries. 
Each time you score 10,000 points, you 
gain two countries and a Bonus Flag 
question. (Here you must choose a giv- 
en country’s flag from among three dis- 


played.) With a system like this, players 
are encouraged to keep playing. Those 
who are just starting out are not daunt- 
ed by facing a too-big chunk of materi- 
al. Intermediate scholars persevere to 
stay in the game, and smart players can 
keep going forever, 

There’s nothing to dislike about 
World Geography. Bear in mind, it’s an 
educational game with the emphasis on 
education. But lovers of trivia games 
also will be satisfied with the format, 
and for learning these facts, it’s a gem! 

We checked some of the infor- 
mation presented, and it appears to be 
accurate and up-to-date, The maps and 
flags are excellently rendered, a tribute 
to the programmer's abilities, Assem- 
bling all this material and designing the 
necessary graphics is an awesome ac- 
complishment. The concept is educa- 
tionally sound, and the execution is 
flawless. 


—David and Robin Minnick 


World Geography 
Bobco 

200 Seventh Ave. 
Suite 111 

Santa Cruz, CA 95062 
$24.95 


Aussie Games 


Blokes and sheilas should have a bonza 
time with this ripper from Mindscape 
titled Aussie Games, Even if you're a 
simple seppo like myself and don’t un- 
derstand Strine, check out the manual’s 
glossary and get set for a fair-dinkum 
treat. 

Aussie Games is a two-disk collec- 
tion of six recreational, true-blue Aus- 
tralian games. Don’t expect to see these 
events in the next Olympics though— 
this Aussie six-pack is a half-dozen of 
the wackiest sports you'll find any- 
where this side of Alice Springs. 

By the way, in case you aren’t sure, 
you blokes and sheilas (guys and gals) 
might like to know that in Strine (the 
Australian language) bonza means ex- 
tremely good, ripper is any excellent 
thing, seppo refers to us Yanks, and fair- 
dinkum is anything real. 

Aussie Games allows players to 
choose the order of events offered. Try 
all of the events in order by picking, 
Aussie Safari, compete in the event of 
your choice, or simply practice your fa- 
vorite event. 

The Safari takes you to a number 
of spots throughout Australia, Your first 
stop is Sydney, where you attempt the 
sport made famous by kids on spring 
break; the Belly Whack, The objective is 
to get the biggest splash without run- 
ning out of time. First, your diver has to 
take a few good breaths; then you press 
the fire button to begin the flop. The 
challenge comes in keeping the diver 


from going head or feet first. 

From Sydney you move to Mel- 
bourne for Beach Footy. Using the fire 
button, kick the football as far as you 
can and then position your onscreen 
partner to catch the ball. Catching it is 
difficult but not impossible. Even if you 
miss the ball, you receive points for the 
distance it’s kicked. Try to do well here 
because the sheilas are watching, 

Next it’s off to the bush for a go at 
boomerang competition, Getting the 
hang of throwing the boomerang is 
only half the battle. The boomerang is 
going to come back, Then you must de- 
cide whether to simply reach out and 
grab it, jump for it, or duck, As in Beach 
Footy, you receive points for distance; 
extra points are awarded if you catch it, 
Mind your head with this one, 

Now, on to Ayres Rock for the Dry 
River Race. This is not meant for the 
weak of arm because you and a friend 
have to carry the boat in this event. To 
get your team going, move the joystick 
back and forth quickly. Be sure to jump 
over the many obstacles in the way. If 
you stumble over one, it'll slow you 
down or stop you completely; this 
means you have to build up your speed 
again. You'll be ready for a breather 
after this event. 

You get a break when you go to 
Top End for the Beer Shoot because you 
get to ride in the back of a truck. While 
your sober mate drives, another bloke 
tosses beer bottles for you to shoot. 
Easy you say? Not when the road 
curves like this one does. By the way, 
watch out for the birds flying by, You 
do not get points from bird lovers for 
hitting them. 

Finally you reach Cairns for a little 
Marlin Fishing worthy of Hemingway. 
This is an extremely tough event, You 
must cast your line right next to the 
swimming marlin or it won't bite. If it 
doesn’t hit your lure, keep casting until 
it does. Once you've hooked the fish, 
reel it in carefully or your line might 
break. Watch out if you manage to land 
it—it will try to jump over the edge of 
the boat. 

Aussie Games is an exciting pro- 
gram with fast-paced events, The 
graphics are colorful and often funny, 
particularly during the Belly Whack. In 
addition to the sound effects in each 
event, many of the games have Austra- 
lian tunes such as “Waltzing Matilda’’ 
and “Botany Bay” playing in the back- 
ground for an added touch of authentic- 
ity. Get ready for some fun with this 
one—you'll find it dinki-di. 

—Alison Fleming 


Aussie Games 
Mindscape 

3444 Dundee Rd. 
Northbrook, IL 60062 
$29.95 
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Peter M. L. Lottrup 


ADD SENSATIONAL VIDEO EFFECTS TO YOUR 
BASIC PROGRAMS WITH THIS POWERFUL MACHINE 
LANGUAGE UTILITY FOR THE 64. DEMO INCLUDED. 


Want to spice up text-screen presenta- 
tions in your BASIC programs? If so, try 
Raster Master, This short machine lan- 
guage routine creates a dramatic win- 
dowing effect like none you've seen 
before. 

This effect is achieved using a two- 
step process. First, you position some 
text in a designated window area. To 
make the text invisible, you print it in 
the color of the screen background, 
Then you call Raster Master, At a rate 
you specify, each screen line in the win- 
dow area is changed to a contrasting 
color, As this process continues, the 
hidden text within the window is grad- 
ually revealed. 


Typing It In 

Raster Master is written entirely in ma- 
chine language, so you'll need to use 
MLX, the machine language entry pro- 
gram found elsewhere in this issue, to 
type it in. The MLX prompts, and the 
values you should enter, are as follows: 


C000 
C13E 


Enter the data for Raster Master, Before 
you exit MLX, save a copy of the program 
to disk with the name RASTER.ML. 
Raster Master Demo, written in 
BASIC, illustrates some of the typical 
effects that are possible with Raster 
Master, Type it in using The Automatic 
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Starting address: 
Ending address: 


Proofreader, also found in this issue, and 
save a copy of the program to disk. 


Four Commands 
By using the 64’s raster-interrupt rou- 
tine, Raster Master lets you change a 
vertical portion of the text screen to an- 
other color. Four SYS commands are all 
that's required. 

The first command, SYS 49152, ac- 
tivates the utility. Call it once near the 
beginning of your program, 

The second SYS command is re- 
sponsible for opening the text window. 
The syntax for this command is 


SYS 49155,color,row|,number of 
rows)[,speed] 


Color (0-15) is the color you want in the 
opening window (also stored in loca- 
tion 2). Row is the number of the screen 
line (0-255) on which the window will 
be located. Remember: As with the 64’s 
standard sprite-coordinate system, only 
screen lines in the range 50-249 are on 
the visible portion of the screen. 

The two optional parameters are 
number of rows and speed. Number of 
rows determines how many screen lines 
in each direction (up and down) the 
window should cover. A value of 4, for 
example, creates a window eight lines 
high. If you don’t include this parame- 
ter, Raster Master assumes maximum 
size (the whole screen). 





Speed determines the opening 
speed of the window, Any value in the 
range 0-255 may be used, with higher 
numbers representing slower speeds. If 
you don’t include this parameter, an av- 
erage speed of 30 is used, 

The next command, SYS 49158, 
closes an opened window. The window 
closes at the rate assigned when the 
window was opened. 

The final command, SYS 49161, 
disables the utility and restores the 
standard IRQ interrupt vector. Use this 
command to turn off the utility while 
you change the background screen 
color or when you've finished with all 
window displays. To reactivate the util- 
ity, use SYS 49152, 


The Demo 

When you're ready to see Raster Master 
in action, place the disk containing 
RASTER.ML in the drive; then load and 
run the demo. The demo illustrates a 
variety of effects; Small-width windows 
are generated by concealing a portion 
of the raster band with sprites, separate 
areas of text are revealed in sequence, 
windows are opened and closed at dif- 
ferent rates, and a selection-bar menu is 
simulated. 

To help you understand the setup 
for each effect, the demo has been com- 
mented liberally. Note the use of loca- 
tions 820 and 821 in this program. To 


prevent the screen from flashing, win- 
dows are initially established offscreen 
using these locations. Then they’re 
moved onto the screen with the SYS 
49155 command. 


RASTER.ML 





C090:2C 
CO9B:AD 20 
9 





Ce@Cce:Ccl 
coce:00 





Sees Sousa sous 
wo 
a 
s 
o 


Raster Master Demo 


HQ 16 REM COPYRIGHT 1996 COMPU 
TE! PUBLICATIONS, INC. - 
ALL RIGHTS RESERVED 
GOSUB71@:REM GO SET UP C 
OVER-UP SPRITES 

IF PEEK(49152)<>76 THEN 
{SPACE}LOAD"RASTER.ML",8 


HB 2 


3 


FM 30 


1 
' 
SYS49161:REM DISABLE ROU 
TINE IN CASE IT'S ACTIVE 
DIMV$ (25) :V$(G)="{HOME}" 
sFORI=1T024:V§ (I) =V$(I-1 
)+"{DOWN)": NEXT: POKE5S328 
0,0 
REM CREATE 1-LINE WINDOW 
OFFSCREEN TO PREVENT SC 
REEN FLASHES 
POKE820,250:REM PLACE WI 
NDOW Y-COORDINATE IN 826 
POKE821,1:REM ASSIGN NUM 
BER OF LINES (1) IN WIND 
OW IN 821 
REM POSITION COVER-UP SP 
RITES ON EITHER SIDE OF 
{SPACE}WINDOW TO SIMULAT 
E MARGINS 
100 POKE53248,10:POKE53249, 
12G:REM SPRITEG X POSIT 
ION, SPRITEG Y POSITION 
110 POKE5S3252,40:POKE53253, 
120:REM SPR2 X POSITION 
, SPR2 Y¥ POSITION 


PX 40 


AP 50 


DF 60 


FF 70 


cy 8a 


RM 96 


HB 


MP 


DX 


DE 


cE 


KK 


BE 


HB 


XS 


cH 


JG 


126 


136 
146 


156 


168 


176 


186 


198 


20 


216 


340 
368 


430 


POKE53248+16,12:REM SET 
HIGH BIT OF SPR2 AND S 
PR3 HORIZONTAL COORDINA 
TE 

POKE53248+21,15:REM ENA 
BLE SPRITES 0-3 
POKE53281,0:PRINT" (CLR) 
{BLK} "VS (12) TAB (5) "COMP 
UTE!'S GAZETTE PRESENTS 
SYS49152:SYS49155,3,150 
110,50:REM OPEN WINDOW 
GOSUB700:SYS49158:GOSUB 
700:REM PAUSE AND THEN 
{SPACE}CLOSE WINDOW 
POKE53250, 40: POKES3251, 
120:REM SPR1 X POSITION 
+ SPR1 ¥ POSITION 
POKE53254,10:POKE53255, 
12G:REM SPR3 X POSITION 
+ SPR3 Y POSITION 
PRINTV$ (12) TAB(5)" 

{8 SPACES}RASTER MASTER 
{9 SPACES}" 
SYS49155,6,12*8+54,10,5 
9:GOSUB760:SYS49158:GOS 
UB700 
POKE53248+21,0:REM DISA 
BLE ALL SPRITES 

PRINT" {CLR}"V$ (8) TAB(7) 
"FANTASTIC PRESENTATION 
S"V$(1G)TAB(14)"FOR ALL 
YOUR" 
PRINTVS (12) TAB (21) "PROG 
RAMS" 
SYS49155,11,12*8+42,50, 
20:GOSUB700:GOSUB700 
PRINTVS (9)TAB (7) "{4 PALL 
CREATED" V$ (11) TAB(14)" 
WITH THE HELP" 
PRINTV$(13)TAB(21) "OF R 
ASTER MASTER" 

SYS 49158 :GOSUB700:GOSUB 
700 
POKES3280,0: PRINT" {CLR} 
":FORTT=1103 
PRINTVS(8)"{3 SPACES} 
{BLK)THIS IS THE 

{13 SPACES}"VS$ (16) TAB(7 
)"MIXUP EFFECT" 
PRINTV$ (12) TAB (12) "MIXI 
NG SCREEN TEXT 
POKE820, 250: POKE821,1:S 
¥849155,6,12*8+50,50,10 
:GOSUB700 

PRINTVS(7)"(3 SPACES) 
{BLU}SEE HOW THIS"V$(9) 
TAB(7) "TEXT APPEARS AS" 
PRINTVS (15) TAB (12) "THE 
{SPACE}OTHER DISAPPEARS 











PRINT" {CLR} {8}THIS IS T 
HE CURTAIN EFFECT(BLK}" 
FORI=2T022: PRINTVS (I) TA 
B(9)"COMPUTE!'S GAZETTE 
"SNEXT 
POKE820, 250: POKE821,1:S 
¥S49155,15,250,206,20:G 
0SUB700:GOSUB700 

PRINT" {HOME} (37 SPACES} 


SYS49158:PRINT"(CLR}":S 
¥s49161 

POKE8 20, 250: POKE821,1:P 
OKE53286,6:POKE53281,6: 
S¥S49152 
SYS49155,2,89,1,50:VX=8 
9: POKE826,VX: POKE821,VX 
+9 

PRINT" {CLR}{7}CREATE A 
{SPACE}MENU OR SELECTOR 





BAR" 








AQ 440 PRINT"{DOWN)(YEL}USE <U 
P> & <DOWN> CURSORS TO 
{SPACE }MOVE" 

SA 450 PRINT"PRESS <Q> TO QUIT 
{BLK}"3 PRINT 

cM 460 FORI=1T09: 
{5 SPACES)"; :FORJ=1T04: 
PRINT"LINE"STRS(I)" "72 


EXT 

RINT" 
}"j:BORI=1T04: 

PRINT"LINE"STRS(I)" "72 

RINT: NEXT 

GETAS:IFAS="{UP)"THENS2 

6 








GC 486 





490 
500 
510 
520 


IFAS="{DOWN} "THEN5S4@ 
IPAS<>"Q"THEN48 
GOTO569 
VX=VX~8 t LEVX<89THENVX=8 
9 


FE 
Pd 
EF 
SE 
GM 530 POKE826,VX:POKE821,VX+9 
:GOTO480 
VX=VX+8 t LFVX>233THENVX= 
233 
POKE826 , VXt POKE821,VX+9 
1GOTO480 
SY849158:GOSUB700:SYS49 
161: POKE53281,0:S¥S4915 
2:POKE820, 250: POKE821,1 
PRINT" {CLR} (CYN}YOU CAN 
VARY SPEED AND COLOR" 
A=4G:FORI=1T07:A=A-5:SY 
849155, INT(RND(1)*7)+7, 
90,15,A 
SY849158:GOSUB700:NEXT: 
POKE53280, 0: POKE53281,0 
+ POKE826, 250: POKE821,1 
POKE53248+21,1 

PRINT" {CLR}"V$ (10) TAB (6 
)"{RED} 


290900000Q000000 
OeESBULPER PRINTVS (I) 


AB (6) "Q"'TAB (31) "Q" NEXT 
PRINTV$ (14) TAB (6) "{RED} 


XC 546 


SQ 550 


BD 566 


BE 570 


RP 586 





CG 596 





DK 
SA 


600 
616 


EC 620 


FQ 630 


CM 640 PRINTVS (12)TAB(10)" 
{BLK} (R)ESTART OR (E)ND 
{cyn}" 
SYS49155,3,150,10,100:G 
osuB700 
GETA$:SYS49158:1FAS=""T 
HENG4G 


IFAS=" 
N 


FJ 65! 


PD 660 


CE 670 THENSYS49161:RU 





ss 
xQ 


QH 
RA 


686 
690 


IFAS<>"E"THENG40 
S¥S49161:PRINT" {CLR} 
{C¥N}" END 
FORDY=11T0500:NEXT: RETUR 
N i 

FORT =832T01+63:POKEI , 25 
5:NEXT:REM DEFINE SOLID 
BLOCK SPRITE 
POKE53248+23, 255: POKES3 
248+29,255:REM EXPAND A 
LL SPRITES IN X AND Y D 
IRECT. 
POKE53248+27,255:REM SE 
T SPRITE PRIORITY OVER 
{SPACE}FOREGRD COLOR 
FORT =53248+39T0I +7: POKE 
I,0:NEXT?:REM SET ALL SP 
RITES TO BACKGROUND COL 
OR 
FORI=2040102047:POKEI,1 
3:NEXT:REM SET POINTERS 
TO SPRITE DEFINITION D 
ATA 
FORI=53248T01+15:POKEI, 
G:NEXT?REM LOCATE ALL S 
PRITES AT 0,0 

778 RETURN G 
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768 
710 


KE 72 


GE 736 


ss 746 


EA 758 


Qc 760 


BG 


tiahaL. Ele let 








VBook ~ 


Your spreadsheet or data base doesnt really understand your personal checkina! 
Check out these features: 


117 typos of checking transactions ¥ Schedules poriodie transactions 
¥ Handles overdrat protection Custom transaction categories 
- Remombers payoes for tast entry Y Monthly balancing 

Full screen editing and selective queries ¥ Optional password protection 


Y 8 typos of reports plus check printing 
¥ ©84/40 col. and C128/80 col. programs ‘sub-directories on 1581 drives 
¥ Supports 1541/1571/1581 drives ¥ Calculator, and more... 
Computer Craftware + 17966 Arbolada Way + Tustin, CA 92680 
(714)953-8177 + $34.95 + $2.50S8H (CAros. add 6%) 


-Y Usilties with partion tools for 
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ELECTRONIC TECHNICIANS, ‘COMMODORE 64/126 
HOBBYISTS, AND ENGINEERS RADIO SHACK COCO 2+3 


SO can sesign, YES! We accept 
‘es eS= 
igs Outside CA 1-800-356-8113 


+ LAYOUT cCaRCUTT BOARDS 

‘on your C-64 or C-128. 
ENTER your requred mputouiest specticatons and the computer designs the cut. 
ELEVEN separate user-inendty. Computer Added Design programs wil help you buld 


In CA (714) 657-4449 


any custom deve Wrne 
FREE WEASELGRAPHICS 
etaled into Doct. 73 


P.O, Box 2046, Sun Cay, CA 92381 
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PROFESSIONA 
HANDICAPPING 


SYSTEMS™ 
“Handicapping sofware 
{for the serious investor 


Greyhound 


PROF JONES INC. 





For information or a 
FREE CATALOG call; 


1-800-553-2256 


Circle Reader Service Number 160 





LABELS LABELS LABELS LABELS LABELS LABELS LABELS 


Now=printlabels upto 15x64 char'sto 12acrossusing 
font and color ilities of your printer. Select 
Underfine Bold EXPAND =>", and more! 


Plus, merge data trom your data base. 


Make Audio/Video cassette (VHS) labels with ease, 
Drop down menus and windows make Label Maker™ 
the easiest and quickest program you'll ever use. 
YES —We stock a compete line of labels too! 





Keystone Software beptG PO. Box 8369 Pittsburgh, Pa 15218 


Circle Reader Service Number 161 





DMBES-THEBULLETINBOAROOFTHEGO'S!Supports OMGES v4.7 $40] 
d Full Commodore® color graphica as well ax ascil. Dolux Mods 89 $49] 
Works at 300-2400 baud supporting Be 1650, 1660, 1670, Avatex, Aprolok £ Empire Deluxe $15 
ALL Hayes compatbles! Can be run wit C64, 64C, SX64, C128 & CI280(64 Casino $10) 
mode), 1700 saries RAM expanders, ALL 1541's & compatties, 1571, 1581.SFD Freddy S10 
1001 & various hard drives! 424 hour suppor ines plus info ines ail around Nort B.T.LC. $10 
‘Americal Fastest 88S around today because the ENTIRE program is inmomor! Underword $15 
Capabitty of unlimited amounts of users, message bases, UO Grociones, Rbrar- Murder Motel $15 
Jes. on-line games! This BBS is menu criven & we know youwalagree Risthemast CarWars $15 
User-frenaly 88S avallable for the Commadoro® 64 today! Also available are full (301)553-0201 

Jongth on fine game modules that can be as large as he BBS and wil enhance your (201)553-0001 

system that much morel You are even provided a modula construction ki so that Add $3 S&H in US. 
you can make your OWN on-ine games! 30 DAY MONEY BACK GAURANTEE! Add $5 S&H in CAN 
Sond: Name, Alas, Address, Voices, BBS#, O8S Name, Equipment Listing & Size C.0.0"s add $5 

ich, Roader Service #102" ARTISoft, P.O Box 96, Glen Burnie, MO 21061 Md Residents add 5% 
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Shoppers Mart 


BIBLE SEARCII 


KJV or NIV—Complete New Testament text and Concordance with very fast word search 
and verse display capabilities. Word(s) in text can be found and displayed in seconds 


Includes both C-64 and C-128 mode programs. Please specify 1541, 1571 or 1581 disk 
format. KJV—$25.00 (New) NIV—$30.00 


BIG BLUE READER 128 64 


Transfers word processing, text and ASCII files between Commodore and IBM MS-DOS 
diskettes. Requires 1571 or 1581 Dish Drive. ONLY $44.95 














SOGWAP Software 
(219) 724-3900 
115 Bellmont Rd., Decatur, IN 46733 


TAX COMMAND 


EASY ENOUGH FOR INDIVIDUALS * POWERFUL ENOUGH FOR THE PRO 
‘90% of users recently surveyed list ease of SATISHED. IBM: $99.95; Apple 2, Commodore 
luse as the most important reason to usa it 64, 128: $59.95. Send check or credit card info 
Year after year. Inches Form 1040, Schedules to Practical Progra, Inc, Box S314, Milwaukee 
ASE, Forms 2106, 279, 2441 3903, 4562, 6251 WI 53203. Or call 


ci erumroneoortot 1-800-776-7047 its 


GUARANTEED: RETURN FOR REFUNO IF NOT 
Circle Reader Service Number 111 

















ATTENTION ROLE PLAYERS 


CHARACTER EDITORS ($19.95 each) - Might and Magic. 
Bards Tale (1 or 2 or 3)), Wasteland, Ultima (1, 2, 3, 4 or 5), 
Wizardry (1, 2 or 3), Pool of Radiance, Neuromancer, Elite, 
Phantasie (1, 2 of 3), Mars Saga, Magic Candle, Dragon Wars, 
Hillsfar ($12.95), Space Rogue, Knights of Legend. 
MONSTER EDITORS (12.95 each) - Might and Magic, 
Curse of the Azure Bonds, Poo! of Radiance. 
HINT BOOKS ($9.95 each) - Wizardry (1. 2, or 3), Might end Magic, 
Curse of the Azure Bonds, Legacy of the Ancients. 
‘Add $3.00 for shipping.Amiga, Apple and IBM versions also available. 
GOSSELIN COMPUTER CONSULTANTS 
P.O. Box 1083 » Brighton. Mi 48116 + (313) 229-2453 





Circle Reader Service Number 112 


BROWN BOX FAMILY HAS GROWN! 
U 
128K & 256K CARTRIDGES NOW AVAILABLE 
64K QBB owners can add QBB-B+ Extender card to store 128K of C64 or 
C128 programs. These battery-backed cartridges hold their memory even 
when computer is turned off. Store dozens of programs for easy, instant 
‘access. Change contents whenever you wish. 32K QBB $79; 64K QBB $99; 
64K QBB-B $95 (must have 64K QBB); 128K QBB $179; 256K OBB $269. 
Aprotek Extender $25. 
‘Add $3 s/h ($5 overseas). MA residents add 5%. Call or write for “Write Stuf" pkg 


Brown Boxes, Inc., 26 Concord Rd., Bedford, MA 01730 (617) 275-0090; 862-3675 





Pea OGL AMIGA” 
‘COMMODORE DUGNOSTIOAN 
(Reterence Ac #6) 
JUST RELEASED. Ths tly updated version 


REPLACEMENT CHIPS 
6510. $1095 
6528, $1225, 
6567 31595 
6581 $1150 
PLA $1295, 


‘AL S01 ROMS -| "$1095 
‘AND MANY MORE 
Ck Hou Pers $2495, 


‘ASO1/801 512K RAM 
Board $109.50 


a ) "THE GRAPEVINE. 
35 CHARLOTTE DAVE «WESLEY FILLS. MY 10577 
Grey sseaaea e008. 7445 FAX (te) 354-6095 


PRICES SUBLECT TO CHANGE 
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fohet elt 








\o! Professional-Educational-Home Applications 
‘Architects, Engineers, Designers, 
3-D GRAPHICS DESIGN Programmers, Students 











‘Voted West Graphics Program tte 


Kiln Magazine 1388 
For Commodore 64/128 in 64 mode 
‘View Designs in Multiple Perspectives 





tht Software 

22v) CHESTNUT STREET 
Surrene2 
SANFRANCISCO, CA 94123 


ORDER LINE * (415) 923-1081 
FAX * (615) 92: 
DealersiDistributors inquiries welcomed. 


Circle Reader Service Number 186 


THE BASEBALL DATABASE 


«, LET YOUR COMPUTER KEEP TRACK OF 
YOUR TEAM'S BASEBALL STATS ! 
EASY TO USE + COMPREHENSIVE $49.95 APPLE lle/lic/lIGS 
DETAILED PRINTED REPORTS — $39.95 COMMODORE 64/128 


‘Add $2.50 shipping & handling; 15 day money back gua VISA/MC/check 
‘or MO: Program specs & details available upon request 


JACOBSEN SOFTWARE DESIGNS 


Attn: Order - CPG 
Eugene, Oregon 97405 





1590 E, 43rd Ave 


Phone: (503) 343-8030 
Circle Reader Service Number 159 





Super Printer Driver—near laser-quality printing for 
Epson, Star, and compatible dot-matrix printers 
Skeet—outstanding arcade-style game that runs as a GEOS 
desk accessory 

File Saver—run most any 64 program from GEOS 

Help Pad—fast, easy online help via menu 

Word Count—quick, easy-to-use tool that counts words in 
any geoWrite text file 

Directory Printer—get complete GEOS directory printouts, 
including file size, author name, and even file comments 
Quick Clock—large, readable clock and improved user 
interface 

SlideShow—create and display impressive slide 
presentations 

File Retriever—recover GEOS and standard Commodore 
files; compatible with any Commodore drive or REU 
Screen Dumper—desk accessory that lets you dump screens 
to any printer 

Font Grabber—instantly turn your favorite Commodore 
character sets into GEOS fonts 

GeoPuzzle—intriguing, multidimensional brainteaser 
GeoConyerter—write GEOS applications with your favorite 
Commodore assembler 











Shoppers Mart 


mm 
NT) 


LADY LUCK (6101) » Vegas style games 
PRODUCTIVITY AIDES (6105) « Nice collection 





13 of Gazette’s Best Programs 
for GEOS and GEOS 128 Users 
On One Dis 


------------7 





LEARN TO PLAY GUITAR 


GUITAR TUTOR 


é 


people 
of C-128 and sent $29.05 to: 


Northorn Star Software, P. 0. Box 63, Oak Crook, Wi 53154 
For MastorCard/Visa ordors, call toll-free: 1-800-648-5286 
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COMMODORE? 64/128 
5 Disk Special $14.95 


Chote any 8 dake bated (Postage Pa 








SY Whe 





STEREO SID PLAYER V10 (6005) -anim 
muse fles which can play in stereo, 


making programs with 3D manu mal 


20 & print business forms, invoices, labels, otc 
PUB/BOARD GAMES (6118)-Darts, monopoly andmore, [*Shareware requires separat 
FUN GRAPHICS MACHINE (6001)*-Deshtop publishing | hors # found vaoul Each disk is $2.99 whon, 


IME PITS (6100) » Driving games. 


less than § are ordered plus $4.00 shipping! 
ME MALL / 2 (0090) - Arcade action, 


handing: Novada residents add 6%ealos tax 
8600 Paradise Fi. V 00101} 
(702) 731 « 6566, 


Circle Reader Service Number 183 


includes all 
—— documentation 


—________ copies of 

The GEOS Collection. I've enclosed $11.95 
(including shipping and handling) for each copy. 
Name 


Address 











City State zip 


Amount 
Sales Tax* 


Total 


Mail personal check or money order for $11.95* to 


The GEOS Collection Disk 
P.O. Box 5188 
Greensboro, NC 27403 


*Residents of New York, Pennsylvania, and North Carolina add appropriate 
sales tax for your state. All orders must be paid in U.S, funds by’ a check 
drawn on a US. bank. Please allow 4-6 weeks for delivery. For delivery 
outside the U.S. or Canada, add $1 for surface mail or $3 for airmail 











machine language 





Jim Butterfield 


Programs on Commodore 8-bit com- 
puters normally reside within a BASIC 
operating system. To run a machine 
language (ML) program, BASIC must 
call it. The ML program often runs as a 
subroutine, When it has finished, con- 
trol returns to BASIC, which continues 
running a program or, if no program is 
active, prints the READY prompt. 
BASIC and machine language can 
work together in splendid symbiosis, 
each doing what it does best. This is a 
feature of these machines; high-end 
computers don’t have BASIC resident 
in the system, and more work is neces- 
sary to graft together two languages. 
The most common way to call ma- 
chine language from BASIC is with the 
SYS command. This is a subroutine 
call, and the ML may return to BASIC 
with a simple RTS (ReTurn from Sub- 
routine) instruction. There is another 
method which uses the USR( ) function. 


A SYS Substitute 

USR is a function like RND or SQR. As 
such, it must be followed by a numeric 
argument in parentheses, for example, 
X=USR(123), You can see from this 
that the USR function is supplied with a 
value (in this case, 123) and delivers a 
result (in this case, assigned to variable 
X), Only one number is passed each 
way; USR can’t directly handle two- 
valued operations such as add or com- 
pare. But, because of the parameters 
that it can pass, USR can be quite handy 
as a substitute for SYS, 

Although USR passes a number to 
the subroutine and accepts a value 
back, you don’t have to use either val- 
ue, The machine language program can 
ignore the value that was supplied. And 
BASIC can ignore the return value, al- 
though it will have to use it temporar- 
ily. In the above example, the return 
value is set to X, but the BASIC program 
could proceed without ever using vari- 
able X again, Incidentally, if the ma- 
chine language program doesn’t 
change the value supplied as part of the 
call, the same value will be returned. 
Thus, if the USR routine contained only 
a RTS (return) instruction, PRINT USR 
(77) would print 77. 

How does USR know where to find 
the machine language subroutine? Its 
address is placed in the USR vector 
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using the locations shown below. 


785,786 
812,813 
4633,4634 (bank 0) 


USR passes its parameter from 
BASIC to machine language, and vice 
versa, using the floating-point accumu- 
lator found at the following locations: 


Commodore 64: 
Plus/4 and C16: 
Commodore 128: 


C64, Plus/4, C16; 97-99 
Commodore 128: 99-104 
(all banks) 


Floating-Point Format 

Numbers are stored in the floating- 
point accumulator in floating-point for- 
mat. The first byte contains the exponent 
of the number; the next four bytes con- 
tain its mantissa. If the exponent is 0, 
then the whole number is 0; if the expo- 
nent is not 0, then it determines where 
the binary point is placed in the mantis- 
sa. The mantissa multiplied by 2 raised 
to the value of the exponent gives you 
the value in the floating-point accumu- 
lator. Finally, the last byte contains the 
sign. If the high bit is set, the number is 
negative, 

An example would be useful here. 
How would we write the decimal value 
10 in floating-point format? First, con- 
vert the number to binary: 1010.000. 
Then pack this value into the four-byte 
mantissa area so that the high bit is in 
the high position, The first byte be- 
comes 10100000; the remaining three 
bytes are 0. Now, the binary point is 
four positions into that first byte. So the 
exponent, which is always offset by 
$80, becomes $84. Finally, the sign bit 
is 0 fora positive number. The resulting 
hexadecimal value for 10 in floating- 
point format is 84 AO 00 00 00 00. 

To read a floating-point number, 
you would reverse the process, writing 
out bits in the mantissa and then plac- 
ing the binary point. Within a program, 
you would likely perform a series of 
shift/rotates to move the mantissa bits 
into the proper position. It’s important 
to note that floating-point numbers that 
you give back to the system should be 
normalized—that is, the most signifi- 
cant bit must be shifted until it occupies 
the high-bit position of the mantissa. 

Floating-point values stored in 
variables or arrays occupy five bytes 
rather than six. The trick here is to take 
the sign bit and use it to replace the 


USR and Floating Point 


highest bit in the mantissa (which 
would always normally be on). 

Let’s consider a short example for 
the Commodore 64, The BASIC pro- 
gram at the end of this column contains 
a machine language routine which tests 
to see if the value supplied to it is 10 or 
greater. If the value is too high, it’s re- 
placed with 10; otherwise, it’s left alone, 
The program POKEs the machine code 
below into the cassette buffer and then 
accesses the USR command. 


O8BC LDA $61 _ jcheck exponent for 
0 

O8BE BEQ $08E0 

08CO CMP #$84 ;now, for 10 
exponent 

08C2 BEQ $08DA ;if OK, check 
mantissa 

08C4 BCC $08E0 ;if less than 10, exit 

08C6 LDA #$84_ ;else, store exponent 

08C8 STA $61 

08CA LDA #$A0 jand mantissa for 10 

08CC STA $62 

08CE LDA #$00 

08D0 STA $63 

08D2 STA $64 

08D4 STA $65 

08D6 STA $66 

08D8 BEQ $08E0 ;and exit 

08DA LDA $62 icheck mantissa 

08DC CMP #SA0 if too high, set to 
10 

08DE BCS $08C6 

08EO RTS 


This program works nicely, You'll 
see the second number on each line re- 
peat the first one until the value 10 is 
exceeded. After that, the second value 
remains at this limit. 

But wait! There’s a logic error in the 
program, It tests only the value and not 
the sign. A negative value might not 
produce the desired result for the USR 
function. Try it out. And if you feel up 
to it, modify the program to allow for 
the negative-value situation. 


1G DATA 165,97,240,32,201,132, 
240,22,144,26,169,132,133 
DATA 97,169,160,133,98,169, 
G,133,99,133,100,133,161 
DATA 133,102,246,6,165,98,2 
G1,160,176,230,96 

FOR J=828 TO 864:READ X:T=7T 
+X:POKE J,X:NEXT J 

IF T<>4865 THEN STOP 
POKE785 ,60:POKE786,3:REM PO 
INT USR TO ML 

FOR K=5 TO 15:PRINT K;USR(K 
):NEXT K G 


26 
36 
40 


56 
60 


76 
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@ Several readers have had trouble 
using Disk Doubler (August 1989) with 
their 64s. If you have experienced prob- 
lems with this program, you may wish 
to read “Double Trouble” in the De- 
cember 1989 installment of 
“Feedback.” 

Many users have complained that 
Disk Doubler often stops with an error in 
line 370. This line attempts to write the 
new BAM to the side of the disk that it 
just formatted. If the format was unsuc- 
cessful, the program breaks with an er- 
ror. If you attempt to format the disk 
once again, Disk Doubler says that the 
disk is already double-sided and re- 
fuses to format it, The following modifi- 
cations cause Disk Doubler to ask 
whether you want to quit or format the 
disk anyway when this happens. 


510 PRINT"{RVS}DISK IS ALREADY 
DOUBLE-SIDED": PRINT" {RVS}C 
(OFE}ONTINUE OR {RVS}Q{OFF} 





530 PRINTKS: IFKS=" 
EN190 
540 CLOSE5:CLOSE15: RETURN 


These changes are useful if you want to 
try to format the disk several times 
before giving up. They also enable you 
to destroy the second side of a disk that 
is already double-sided, so be careful. 


@ Disk Inventory (December 1989) loses 
track of the first file that it reads from 
the first disk. To correct this problem, 
change the 0 in line 150 to a 1. 


150 DIMRS (500) :CURRENT=1 


Asecond problem with Disk Inven- 
tory is that it locks up while reading 
some disks, The program currently de- 
termines when there are no more file- 
names to read from a disk by the 
presence of the BLOCKS FREE message 
at the end of the directory listing. In 
rare instances, this message may be po- 
sitioned so that Disk Inventory doesn’t 
see it. The following changes to lines 
250 and 260 correct this problem. 


250 GET#1,XS:S=ST:IFXS<>CHRS (3 
OTHEN250 
IFS <>GTHEN350 


A third problem with Disk Inven- 
tory has to do with reading files on 





write-protected disks. Disk Inventory 
detects whether or not a disk is in the 
drive by watching the write-protect in- 
dicator, When a disk which isn’t write- 
protected is inserted into the drive, the 
write-protect indicator contains a value 
of 16; this indicator contains the value 0 
when a disk is write-protected. When 
you remove a disk from the drive, the 
indicator changes to 0 as you pull the 
disk out and then changes back to 16 
once the disk is clear of the drive, When 
you place a disk that isn’t write-protected 
into the drive, the write-protect indica- 
tor changes to 0 as you insert the disk 
and then changes back to 16 once the 
disk is all the way in. 

Disk Inventory’s problem occurs 
when the disk you insert into the drive 
is write-protected. In that case, the 
write-protect indicator never changes 
back to 16 when the disk is all the way 
in the drive. To circumvent this prob- 
lem, the program counts as it waits for 
the indicator to change to 16, If the 
counter exceeds 50, then the program 
assumes the disk is write-protected and 
tries to read it, The following lines im- 
plement this counter. 


?REM FULLY INSERTED? 
: TEWS<>"""THEN48O 
392 PRINT#15,"M-R"CHR$ (30) CHRS, 





(8) 

393 GET#15,2$:1FZS=""THENZS=CH 
RS (0) 

394 CT=CT+1:1FASC (ZS) =GANDCT<5 
OTHEN391 


If you find that the program at- 
tempts to read the disk too quickly, you 
can increase the 50 in line 394. 


© Grafix Converter (June 1989) doesn’t 
convert Micro Illustrator files correctly, 
Micro Illustrator files may be saved in 
either a compressed or an uncom- 
pressed format. Grafix Converter con- 
verts to the uncompressed format but it 
doesn’t write the header to tell Micro 
Illustrator that the file is uncompressed, 
To correct this problem, change line 
870 and add line 1390 as follows: 





870 PRINT"M/I FILE INFO. 
R R=1T020:READD: PRINT 
$(D) ; :NEXTR 

1390 DATA 255,128,105,103,20,0 
10,232,3,232,3,64,31,1,0,49 
70,208,0,0 G 


:FO 
+CHR 
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Classified 
PSSOPTWARE 


FREE PD & SHAREWARE, C64 
for catalog or $1 for 30 samples and 
catalog. RVH Publications, 4291 Holland 
Rd., Suite 562-G, VA Beach, VA 23452 


FINEST C-64/128 PUBLIC DOMAIN SOFTWARE! 
New catalog of over 3000 programs. As low 
as $1.25 per disk of programs, $2.00 gets 
sample disk & catalog (on disk) mailed 1st 
class, KOALA ENTERPRISES, Dept. GZ, Rt. 2 
Box 677, Carencro, LA 70520 


FREE PUBLIC DOMAIN SOFTWARE - Request 
free catalog or send $2 for sample disk 

and catalog (refundable). C64-128. CALOKE 
IND., Dept. JK, Box 18477, K.C., MO 64133 


THOUSANDS OF PD PROGRAMS FOR C64/128! 
We have Games, Utilities, Music and much. 
more! For information write; Lightspeed 
Software, POB 340427, Tampa, FL 33694 





nd 1 stamp 

















Complete how-to users guide, beginners 


thru disassembler. w/ tutorial mag. All for 
$9.95 + $2.00 p/h. 
Public Domain Software Copying Company, 


33 Gold St., Ste. 13, 
New York, NY 10038 800-221-7372 


COMMODORE: TRY BEFORE YOU BUY. Best 
selling games, utilities, educ'l + classics 
& new releases, 100's of titles, Visa/MC/Dise 
Free brochure, RENT-A-DISC, Frederick Bldg, 
#222, Hunt’n, WV 25701 (304) 529-3232 


RENT 64/128 SOFTWARE! 1000's of disks, 
Lowest prices, No deposit or fee. Free 
catalog, Centsible Software, PO Box 930, 
St, Joseph, MI 49085 (616) 982-0327, 


64/128 PD SPECIAL! 15 DISKS PACKED FULL, 
of Games, Music, Util,, Educ,, Hm/Bus. for $25 
+$2.50 8/h. For more info send SASE, D & V 
CompSoft, PO Box 933, Ardmore, TN 38449 


FREE CATALOG FOR COMMERCIAL SOFTWARE 
30-60% off. Amiga, Apple, Commodore IBM, 
Macintosh, Atari, DISK-COUNT SOFTWARE, 
Box 3, Carteret, Nj 07008 (800) 448-6658 


MUSIC LOVERS! MIDI YOUR C64/128. We have 
music software, Midi interfaces, hundreds 
of pre-programmed songs. Catalog-$1.00. 
MIDI Inn, Box 2362CG03, Westmont, IL. 60559 


‘Thousands of C64/128 PD programs on 400+ 
disks, Free listing or $1 large catalog, 

DISKS O'PLENTY INC,, 7958 Pines Blvd., 
Suite 270A, Pembroke Pines, FL 33024 


64/128 FINEST PUBLIC DOMAIN PROGRAMS 

Pretested quality programs * Most $1.50 * 

*On Disk * YOU pick the programs that YOU 
antit! Free diskfull of programs with first 
For a list + Description send SA 

JLH Co., Dept. G, Box 67021, Topeka, KS 66667 






































ATTN: C-128 owners/all C-128 software 
MapGen ACCOUNTING 128 $30 
MapGen ACCOUNTS Receiv/Pay $15 ea 

or buy total ACCOUNTING pkg for $45 


1989 Fed Taxes (8-schds/12-forms) $44 
ANNUITY ANALYSIS (loan/savings) $14 
Retirement Analysis $14 
Multiple Linear Regression $14 


Spelimaster 128-$9; Blackjack 128-$10 


Send chk or MO — $3 P/H to MapGen Cmptr 
Syst, P.O. Box 709, Thornburg, VA 22565-0709 








CALCULUS BY NUMERIC METHODS $27 
Integrals, derivatives, graphing, root 
finding, fourier analysis, & statistics 
Microcraft, PO Box 1181, Lisle, IL 60532 





Lottery Cruncher will give you the edge 
over other comp. aided Lottery Pickers, 
with 5 modes of probability analysis 

Full function editor works for all 
lotteries, $18.95 (IL. res, 5% sales tax), 
$2.50 S&H to PMG Software, 375 N. 
Clifton, Suite 1F, Chicago, IL 60613 





BEAT LOTTERY BIASES! 
NEW DOS RELEASE! 
YOUR LOTTERY IS BIASED! Un- 
intentionally certain number patterns 
will be selected with a greater treauengy 
than others. LOTTO PICKER 3 will uncover 
exploit these biases & tell you which numbers to 
Fiat ‘guesswork required! BUARANTEED to work 
for all lotteries worldwide or your MONEY BACK! WHEEL- 
ING now included in DOS version! BEAT THE LOTTERY 
TODAY! $39.95 (+2 mh '5/h), 3.5” add $5, Ver, 2.1 for Apple 


11 & 064/128, NY add tax, 
}34-5463 ext 293 (M-F 8-5) 


ORDER TODAY! 1 
GE RIDGE SERVICES, INC., 170 Broadvay, 

Suite 201-CP, New York, NY 10038 yes 
Info/Dealers 718-317-1961. 

C64, C128 & CP/M PUBLIC DOMAIN SOFTWARE 
Free Catalog, fast service, low prices, 

& unbelievable specials, ComputerActive, 

Box 893-C, Clinton, OK 73601 

THE HOTTEST EUROPEAN C64/128 - AMIGA 
GAMES and UTILITIES at super low prices! 


Send $5 for C64 or AMIGA catalog & sample. 
THE GAME SHOP, Box 491, New York, NY 11375 


C-64; SCAN PHOTOS ON PRINTER ONLY $80! 
Make doodles for Geos Etc! Demo Disk $5 
DOCS $2. COD/INFO (809)-829-4220, 2-9pm 
KALTEK/G9, ADJUNTAS, PR 00601-0971 NOW! 


FREE COMMODORE CATALOGS: CALL 1-800-359-2189 
5 Disk Sampler AMIGA ($19.95), C64 ($12.95) 
includes Business, Utilities, Games, Graphics, 
Music & Education! CALIFORNIA Freeware 
1747 E. Avenue Q, Unit C-1, Palmdale, CA 93550 


YOU HAVE MASTERED A MUSICAL INSTRUMENT 
if you can type. Create and store fun 
sound effects and instruments, Play and 
record music, C64 $29 Phillip Shelter, 2 
ve Ave,, Mechanicsburg, OH 43044 


SUPER MARIO BROS (EXCELLENT PD VERSION), 
Slot Poker and Krakout for the 64/128, 

Three top quality games for $6,00! Send 

return address and check to PowerDisk, 

6813 Lotus Way, West Jordan, UT 84084 


GIANT COMPUTER HINT BOOK— 
Over 100 Games Covered!!! 
Send $22 to: James Kato, 10374 
Rainbow Circle, Fountain Valley, CA 92708 



























COMPUTE!’s Gazette Classified is a low-cost way to tell over 200,000 
microcomputer owners about your product or service. 
$25 pee line, minimum of four lines, Any or al of the frst fine set in capital lettors at no charge. Add $15 per 


boldface words, or $50 for 


pkehchad dima hudba ri hicenk alga 


L Cheek! money order, Amnerean Express, Via, ox MasterCard ia 


‘subject to publisher's approval and must be either 
between words. Please underline words to be set in face. 
ost office box numbers in their ads must 


General Information: Advertisers using 
numbers. Orders wil not be 


‘3rd of the third month, cover date 


tole 
Closin, 
10: Kathieen Ingram, Ciassified Manager, 
ad cali Kathleen Ingram at (919) 275-9609. 

bn ad by phone Ingram at (919) 


Notice: 
‘Or questionable copy. 
Rates: Classified 
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‘or logibly printed. One line equals 40 lotters, 
ormanent address and 


wh 
 CouPUTErs Gazete, BO, Box S406, Greensboro, NO 27408. To pace 
be responsible for offers or claims of advertisers, but will attempt to screen 


fea aes ine ear a 





P.D. Software for the 64 and 128, Sample 
Disk and Full Catalog $3,50 or send long, 
SASE for Brochure. Country Soft, Dept. C 
822 Saxonburg Blvd., Saxonburg, PA 16056 


128's-TAKING SPANISH-now you can get the 
Translator to help do your Spanish for you, 
25,000 words, conjugates $47.95, Spanada 

1 Sands Ranch Rd,, Huachuca Cy, AZ 85616 


FREE PD C64-128 SOFTWARE 1000+ EUROPEAN- 
Domestic Best Sellers (Sample + Catalog $2) 

[Send SASE for Catalog]. Westcomp 

Library, PO Box 60818, Reno, NV 89506 


LOTSA DISKS! THE BEST 64/128 PD. Tons of 
Graphics, GEOS, Games, Bible, Utils, YOU 
NAME IT! SASE for FREE list. DISKOVERIES 
PD, POB 9153, Waukegan, IL 60085 


*DO YOU OWN A 1764/1750 CLONE?** 
‘and want Turbodisk to work with it** 
Thave the C-64 answer “TURBOWEDGE”, 
Send $2.50 for complete prog, and dir, 
Comp-U-Count, P.O, Box 900, Camas, WA 98607 




















C128 and C128D Exclusive Software. Order 








“The Banker” complete checkbook software, 
Only $19.95, EasyLife Software Systems, 
PO Box 776, Tinley Park, IL. 60477-0776 








HARDWARE 


KASARA MICROSYSTEMS 1-800-248-2983 
10 YEARS in business, COMPETITIVE 
PRICES on Commodore ICs & Apple Boards 
plus accessories, power supplies. 





COMPUTER REPAIR 


Authorized Commodore Repair Center. All 
Comm, products repaired, free UPS, 48-hr 
turnaround based on parts avail, Software 
City, 901-C N. Wendover Rd, Charlotte, NC 
28211 (800) 522-4789 


Authorized Repairs C64/128: $50 & $65; 1541/ 
1571: $55 & $65; SX64, 128D, Amiga, PC: $Call 
816-425-4400. Selling: DTK-IBM compatible 
computers. Quick Serv. 30 day warranty. 

We buy, sell, trade. MOM & POP’s COMPUTER 
SHOP, 114 N. 16th, Bethany, MO 64424 


C-64 REPAIR $39.95 FLAT RATE, 1541/1571- 
$49.95;SX64-$69.95;128-$64.95, 24 Hr tumn- 
around, 90 dy warranty. A&M Computer Repair, 
'Y 12550, 914-562-7271 


EDUCATION 


B.Sc. & M.S. in COMPUTER SCIENCE 
The Aercan Insite fr Computer Scnons oes an cet enespon- 
enctorgra 10 ean yout Bacher of Soence and Master of Soence oe 
(pees Coreater Sconce at ome BSe_ subjects covered are MS/O0S, 
BASIC. ISCAL_C, Daa File Processing. Osta Structures & Operate 5ys 














lems. S progam ices sajecs my Sofware Engneenng and Wtf 
beigerce 
'AMIERICAN INST, for COMPUTER SCIENCES 
17OLOG 1161 Avenue Sout) 
[Brmngham, AL 35205 
‘CALL 205-033-0339 














The Automatic 


Proofreader 





The Automatic Proofreader helps you 
type in program listings for the 128 and 
64 and prevents nearly every kind of 
typing mistake. 

Type in the Proofreader exactly as 
listed. Because the program can’t check 
itself, type carefully to avoid mistakes. 
Don’t omit any lines, even if they con- 
tain unusual commands. After you've 
finished, save a copy before running it. 

Next, type RUN and press RE- 
TURN. After the program displays the 
message “Proofreader Active,” you're 
ready to type in a BASIC program. 

Every time you finish typing a line 
and press RETURN, the Proofreader dis- 
plays a two-letter checksum in the up- 
per left corner of the screen. Compare 
this result with the two-letter checksum 
printed to the left of the line in the pro- 
gram listing. If the letters match, it’s al- 
most certain the line was typed 
correctly. If not, check for your mistake 
and correct the line. 

The Proofreader ignores spaces not 
enclosed in quotation marks, so you can 
omit or add spaces between keywords 
and still see a matching checksum. 
However, spaces inside quotes are al- 
most always significant, so the program 
pays attention to them. 

The Proofreader does not accept 
keyword abbreviations (for example, ? 
instead of PRINT). If you prefer to use 
abbreviations, you can still check the 
line by LISTing it, moving the cursor 
back to the line, and pressing RETURN. 

If you're using the Proofreader on 
the 128, do not perform any GRAPHIC 
commands while the Proofreader is ac- 
tive, When you perform a command 
like GRAPHIC 1, the computer moves 
everything at the start of BASIC pro- 
gram space—including the Proofread- 
er—to another memory area, causing 
the Proofreader to crash. The same thing, 
happens if you run any program with a 
GRAPHIC command while the Proof- 
reader is in memory. 

Though the Proofreader doesn’t in- 
terfere with other BASIC operations, 
it’s a good idea to disable it before run- 
ning another program. The simplest 
way to disable it is to turn the computer 
off then on. A gentler method is to SYS 
to the computer's built-in reset routine 
(65341 for the 128, 64738 for the 64). 








These reset routines erase any 

in memory, so be sure to save the pro- 
gram you're typing in before entering 
the SYS command. 

When using the Proofreader with 
another utility, disable both programs 
before running a BASIC program, 
While the Proofreader seems unaffected 
by most utilities, there’s no way to 
promise it will work with any and every 
combination of utilities you might want 
to use. The more utilities activated, the 
more fragile the system becomes. 


The Automatic Proofreader 

10 VE=PEEK (772) +256*PEEK (773) :LO 
=43:HI=44:PRINT "{CLR}{WHT}AU 
TOMATIC PROOFREADER FOR "; 

20 IF VE=42364 THEN PRINT"C-64" 

30 IF VE=17165 THEN LO=45:11=46: 
WALT CLR: PRINT "128" 

49 SA=(PEEK (LO) +256*PEEK (HI)) +6: 
FOR J=SA TO SA+166:READ B:POK 
E J,B:CH=CH+B:NEXT 

5@ IF CH<>2057G THEN PRINT "*ERR 
OR* CHECK TYPING IN DATA STAT 
EMENTS":END 

6@ FOR J=1 TO 5:READ RP,LP,HF:RS 
=SA+REsHB=INT(RS/256) :LB=RS—( 
256*HB) 

70 CH=CH+RE+LF+HF:POKE SA+LF,LB: 
POKE SA+HF ,HB:NEXT 

80 IF CH<>22054 THEN PRINT "*ERR 
OR* RELOAD PROGRAM AND CHECK 
{SPACE}FINAL LINE":END 

90 IF VE=17165 THEN POKE SA+14,2 
2:POKE SA+18,23;POKESA+29,224 
:POKESA+139, 224 

100 POKE SA+149,PEEK(772):POKE S 
A+150, PEEK (773) :PRINT "{CLR}P 
ROOFREADER ACTIVE" 

110 SYS SA:POKE HI, PEEK(HI)+1:PO 
KE (PEEK (LO) +256*PEEK(HI))-1, 
O:NEW 

120 DATA12@,169,73,141,4,3,169,3 
7141,5,3,88,96, 165,20, 133,167 

130 DATA165,21,133,168,169,0,141 
+G,255,162,31,181,199,157,227 

140 DATA3,202,16,248,169,19,32,2 
-10,255,169,18,32, 210,255,160 

156 DATAG,132,180,132,176,136,23 
G,180,200,185,0,2,240,46,201 

166 DATA34,208,8,72,165,176,73,2 
55,133,176,104,72, 201,32, 208 

178 DATA7,165,176,208,3,104,208, 
226,104,166,180,24,165,167 

18 DATA121,0,2,133,167,165,168, 
105,0,133, 168, 202,208,239, 240 

190 DATA2G2,165,167,69,168,72,41 
15,168,185,211,3,32,210,255 

200 DATA1O4,74,74,74,74,168,185, 
211,3,32,210,255,162,31,189 

216 DATA227,3,149,199,202,16,248 
+169,146,32,216,255,76,86,137 

228 DATAG5,66,67,68,69,70,71,72, 
74,75,77,80,81,82,83,88 

230 DATA13,2,7,167,31,32,151,116 
117,151, 128,129, 167,136,137 




















MAIL TO: 
COMPUTE!’s GAZETTE 
SUBSCRIBER SERVICE 
P.O. Box 3251, Harlan, 1A 51537 
Change of Address: Please advise as early as 


possible. Attach label with your old address and 
write in new address below. 


New Subscriber: Fill In your name and address 
below. Use separate sheet for gift orders, 


PLACE LABEL HERE 


Renewal: Attach label. 


—— One year $24.00 ___Two years $45.00 
(Foreign subscribers please add $6.00 per yoar 
for postage) 


NAME 
STREET 

CITY/STATE/ZIP 

—— Please bill me ___ Payment enclosed 
For other subscription questions or problems, 


please write a note and send entire form to the 
above address, OR CALL TOLL-FREE: 


1-(800) 727-6937 





BEST OF 
88 
GAZETTE DISK 


CLOSEOUT SALE! 
ONLY $6.50 


The Best of 88 Gazette Disk contains 
the 15 finest Gazette programs pub- 
lished in 1988. While supplies last, 
we're offering this disk to Gazette 
feaders for only $6.50. This fantastic 
disk includes 12 Commodore 64 pro- 
grams and three 128-only programs. 


Here's what you get: Arcade Volley- 
ball, Basically Music, BB Barrage, 
Crossroads II, Fractal Dragons, Firel, 
Mob Maker, Mosaic, Quick, Rally 
Racer, Scorpion II, and Trap. In addi- 
tion, for Commodore 128 users, the 
programs Block Out, Cribbage, and 
Math Graphics also are included 


Supplies are limited, so order today. 
Send $6.50° along with your name 
and address to Best of ‘88, P.O, Box 
5188, Greensboro, North Carolina 
27403, 


‘Residents of New York, Pennsyivania, and North 
Carolina odd appropriate sles tax, All orders 
must be paid in U.S, funds drawn on a US. bank, 
MasterCard or VISA accepted for orders over 

$20. Ploate alow 4-6 woeks for delivery, For dollv- 
ery outtide US. oF Canada, add $1 for surface 
mail ot $3 for airmail, 
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‘MLX 


Ottis R. Cowner 


MLX is a labor-saving utility that al- 
lows almost fail-safe entry of ma- 
chine language programs. Included 
are versions for the Commodore 64 
and 128, 


Type in and save some copies of the 
version of MLX appropriate for your 
computer (you'll want to use it to enter 
future ML programs from Gazette). 
When you're ready to enter an ML pro- 
gram, load and run MLX. It asks you for 
a starting address and an ending ad- 
dress. These addresses appear in the 
article accompanying the MLX-format 
program listing you're entering. 

If you're unfamiliar with machine 
language, the addresses (and all other 
values you enter in MLX) may appear 
Strange. Instead of the usual decimal 
numbers you're accustomed to seeing, 
these numbers are in hexadecimal—a 
base 16 numbering system commonly 
used by ML programmers. Hexadeci- 
mal—hex for short—includes the nu- 
merals 0-9 and the letters A-F. But even 
if you know nothing about ML or hex, 
you should have no trouble using MLX. 

After you've entered the starting 
and ending addresses, you'll be offered 
the option of clearing the workspace. 
Choose this option if you're starting to 
enter a new listing. If you're continuing 
a listing that’s partially typed from a pre- 
vious session, don’t choose this option. 

A functions menu will appear. The 
first option in the menu is Enter Data, If 
you're just starting to type in a program, 
pick this, Press the E key and type the 
first number in the first line of the pro- 
gram listing. If you've already typed in 
part of a program, type the line number 
where you stopped typing at the end of 
the previous session (be sure to load the 
partially completed program before you 
resume entry), In any case, make sure 
the address you enter corresponds to 
the address of a line in the listing you 
are entering. Otherwise, you'll be un- 
able to enter the data correctly. If you 
pressed E by mistake, you can return to 
the command menu by pressing RE- 
TURN alone when asked for the ad- 
dress, (You can get back to the menu 
from most options by pressing RE- 
TURN with no other input.) 


Entering a Listing 

Once you're in Enter mode, MLX prints 
the address for each program line for 
you, You then type in all nine numbers 
on that line, beginning with the first 








two-digit number after the colon (;). 
Each line represents eight data bytes 
and a checksum. Although an MLX- 
format listing appears similar to the 
“hex dump” listings from a machine 
language monitor program, the extra 
checksum number on the end allows 
MLX to check your typing. (Commo- 
dore 128 users can enter the data from 
an MLX listing using the built-in moni- 
tor if the rightmost column of data is 
omitted, but we don’t recommend it. 
It’s much easier to let MLX do the proof- 
reading and error checking for you.) 

When you enter a line, MLX recal- 
culates the checksum from the eight 
bytes and the address and then com- 
pares this value to the number from the 
ninth column. If the values match, 
you'll hear a bell tone, the data will be 
added to the workspace area, and the 
prompt for the next line of data will ap- 
pear. But if MLX detects a typing error, 
you'll hear a low buzz and see an error 
message. The line will then be redis- 
played for editing. 


Invalid Characters Banned 

Only a few keys are active while you're 
entering data, so you may have to un- 
learn some habits. You do not type 
spaces between the columns; MLX 
automatically inserts these for you. You 
do not press RETURN after typing the 
last number in a line; MLX automatical- 
ly enters and checks the line after 
you've typed the last digit. 

Only the numerals 0-9 and the let- 
ters A-F can be typed in. If you press 
any other key (with some exceptions 
noted below), you'll hear a warning 
buzz. To simplify typing, 64 MLX fea- 
tures a simulated keypad (see Figure 1). 
The 128 version redefines the function 
keys and + and — keys on the numeric 
keypad (see Figure 2) so that you can 
enter data one-handed, In both cases, 
the keypad is active only while entering 
data. Addresses must be entered with 
the normal letter and number keys. 

MLX checks for transposed charac- 
ters. If you're supposed to type in AO 
and instead enter 0A, MLX will catch 
your mistake. There is one error that 
can slip past MLX: Because of the 
checksum formula used, MLX won't no- 
tice if you accidentally type FF in place 
of 00, and vice versa, And there's a very 
slim chance that you could garble a line 
and still end up with a combination of 
characters that adds up to the proper 








Machine Language Entry Program 
for Commodore 64 and 128 





Figure 1. 64 MLX Keypad 





c 
(E5) 





should not occur if you take reasonable 
care while entering data. 


Editing Features 

To correct typing mistakes before fin- 
ishing a line, use the INST/DEL key to 
delete the character to the left of the 
cursor, (The cursor-left key also de- 
letes.) If you mess up a line badly, press 
CLR/HOME to start the line over. The 
RETURN key is also active, but only 
before any data is typed on a line. 
Pressing RETURN at this point returns 
you to the command menu. After you 
type a character, MLX disables RE- 
TURN until the cursor returns to the 
start of a line. Remember, press 
CLR/HOME to quickly get to a line- 
number prompt. 

To make corrections in a line that 
MLX has redisplayed for editing, com- 
pare the line on the screen with the one 
printed in the listing; then move the 


checksum. However, these mistakes | cursor to the mistake and type the cor- 
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rect key, The cursor-left and -right keys 
provide the normal cursor controls. 
(The INST/DEL key now works as an 
alternative cursor-left key.) You cannot 
move left beyond the first character in 
the line. If you try to move beyond the 
rightmost character, you'll reenter the 
line. During editing, RETURN is active; 
pressing it tells MLX to recheck the line. 
You can press the CLR/HOME key to 
clear the entire line if you want to start 
from scratch or if you want to get to a 
line-number prompt to use RETURN to 
get back to the menu. 


Display Data 

The second menu choice, Display Data, 
examines memory and shows the con- 
tents in the same format as the program 
listing (including the checksum), When 
you press D, MLX asks you for a starting 
address, Be sure that the starting ad- 
dress you give corresponds to a line 
number in the listing, Otherwise, the 
checksum display will be meaningless. 
MLX displays program lines until it 
teaches the end of the program, at 
which point the menu is redisplayed. 
You can pause the display by pressing 
the space bar. (MLX finishes printing 
the current line before halting.) Press 
the space bar again to restart the dis- 
play. To break out of the display and get 
back to the menu before the ending ad- 
dress is reached, press RETURN. 


Other Menu Options 
Two more menu selections let you save 
programs and load them back into the 
computer. These are Save File and Load 
File. When you press S or L, MLX asks 
you for the filename, You'll then be 
asked to press either D or T to select 
disk or tape. 

You'll notice the disk drive starting 
and stopping several times during a 
load (and a save with the 128 version), 
This is normal behavior. MLX opens 
and reads from or writes to the file in- 
stead of using the usual LOAD and 
SAVE commands (128 MLX makes use 
of BLOAD). Disk users should also note 
that the drive prefix 0; is automatically 
added to the filename (line 750 in 64 
MLX), so this should not be included 
when entering the name. This also pre- 
cludes the use of @ for save-with- 
replace, so remember to give each 
version you save a different name. The 
128 version makes up for this by giving 
you the option of scratching the existing, 
file if you want to reuse a filename. 

Remember that MLX saves the en- 
tire workspace area from the starting 
address to the ending address, so the 
save or load may take longer than you 
might expect if you've entered only a 
small amount of data from a long list- 
ing. When you're saving a partially 
completed listing, make sure to note the 





address where you stopped typing. 

MLX reports the standard disk or 
tape error messages if any problems are 
detected during the save or load. (Re- 
member that tape save errors can’t be 
detected.) MLX also has three special 
load error messages: INCORRECT 
STARTING ADDRESS, which means 
the file you're trying to load does not 
have the starting address you specified 
when you ran MLX; LOAD ENDED AT 
address, which means the file you're 
trying to load ends before the ending 
address you specified when you started 
MLX; and TRUNCATED AT ENDING 
ADDRESS, which means the file you're 
trying to load extends beyond the end- 
ing address you specified when you 
started MLX. If you see one of these 
messages and feel certain that you've 
loaded the right file, exit and rerun 
MLX, being careful to enter the correct 
starting and ending addresses, 

The 128 version also has a Catalog 
Disk option so you can view the con- 
tents of the disk directory before saving 
or loading. 

The Quit menu option has the ob- 
vious effect—it stops MLX and enters 
BASIC, The RUN/STOP key is dis- 
abled, so the Q option lets you exit the 
program without turning off the com- 
puter. (Of course, RUN/STOP- 
RESTORE also gets you out.) You'll be 
asked for verification; press Y to exit to 
BASIC or any other key to return to the 
menu, After quitting, you can type 
RUN again and reenter MLX without 
losing your data, as long as you don’t 
use the Clear Workspace option. 


The Finished Product 

When you've finished typing all the 
data for an ML program and saved your 
work, you're ready for the results, The 
instructions for loading and using the 
finished product vary from program to 
program. Refer to the corresponding ar- 
ticle for details on loading and running, 
the program. 


An Ounce of Prevention 

By the time you've finished typing in 
the data for a long ML program, you 
may have several hours invested in the 
project. Don’t take chances—use The 
Automatic Proofreader to type the new 
MLX, and then test your copy thoroughly 
before first using it to enter any signifi- 
cant amount of data. Make sure all the 
menu options work as they should. En- 
ter fragments of the program starting at 
several different addresses; then use the 
display option to verify that the data has 
been entered correctly, And be sure to 
test the save and load options several 
times to ensure that you can recall your 
work from disk or tape. Don’t let a sim- 
ple typing error in the new MLX cost you 
several nights of hard work. 





KR 


PG 


DR 


BD 


160 


176 


18 


S 


19 


208 


210 


220 


230 


240 


250 
260 


278 


280 


290 
300 


310 


328 


3368 


340 


350 


368 
37 


380 
396 
400 


POKE 56,50:CLR:DIM INS,I, 
J,A,B,AS,BS,A(7) »NS 
C4=48:C6=16:C7=7:22=2:24= 
254:25=255:26=256:27=127 
PA=PEEK (45) +26*PEEK (46) 7B 
S=PEEK (55) +26*PEEK (56) HS. 
="123456789ABCDEE" 
RS=CHRS (13) :LS="(LEET)":S 
:D$=CHRS (20) :ZS=CHRS. 
$="(13 RIGHT)" 
§D=54272:FOR I=SD TO SD+2 
3:POKE 1,G:NEXT:POKE SD+2 
4,15:POKE 788,52 

PRINT" {CLR} "CHRS (142) CHRS 
(8) sPORE 53280,15:POKE 53 
281,15 

PRINT T$" (RED) {RVS} 

{2 SPACES}{8 @}(2 SPACES} 
"gpc(28)"{2 SPACES} {OFF} 
{BLU} MLX II {RED}{RVS} 
{2 SPACES} "spC(28)" 

(12 spaces} (BLU}" 
PRINT"(3 DOWN}{3 SPACES}C 
OMPUTE!'S MACHINE LANGUAG 
® EDITOR{3 DOWN}" 

PRINT" (BLK}STARTING ADDRE 
88{4}"; :GOSUB300:SA=AD:GO 
SUB1040:1F F THEN18O 
PRINT" {BLK} {2 SPACES }ENDI 
NG ADDRESS{4}"; :GOSUB300: 
EA*AD:GOSUB1030:1F F THEN 
190 

INPUT"{3 DOWN) (BLK)CLEAR 
{SPACE}WORKSPACE [¥/N] {4} 
"ZAS:1IF LEETS(AS,1)<>"¥"T 
HEN220 

PRINT" (2 DOWN} {BLU}WORKIN. 
G...";tFORI=BS TO BS+EA-S 
A+73POKE I, @:NEXT: PRINT"D. 
ONE" 

PRINTTAB(10)"{2 DOWN} 
{BLK} {RVS} MUX COMMAND ME 
NU {DOWN} €4}":PRINT TS" 
{RVS)E(OFF)NTER DATA" 
PRINT T$"{RVS}D(OFF}ISPLA 
¥ DATA": PRINT TS"({RVS}L 
{OFF)OAD FILE" 

PRINT TS"{RVS}S{OPFJAVE F 
ILE":PRINT TS"{RVS}Q(OFF} 
UIT(2 DOWN} {BLK}" 

GET AStIF AS#NS THEN250 
A=G:FOR I=] TO 5tIF AS#MI 
DS ("EDLSQ",1,1)THEN A=I:T 
=5 

NEXT1ON A GOTO42, 610,690 
700, 280:GOSUB1060:GoTO25 
a 





PRIND"(RVS) QUIT "INPUT" 
{DOWN} {4}ARE YOU SURE [¥/ 
N]";AS:IF LEPTS$(AS,1)<>"¥ 
"DHEN220 

POKE SD+24,G:END 
ING#NS2AD=03 INPUDING : TELE 
N(INS) ¢>4THENRETURN 
B9=INS:GOSUB320:AD=A:BS=M 
ID$ (IN§,3) :GOSUB320:AD=AD 
*256+A: RETURN 

A=G:FOR J=l TO 2:A$=MIDS( 
BS ,J,1) :B=ASC (AS) =C4+ (AS> 
"Q") #C7:A=A*CO4B 

IF B<@ OR B>15 THEN AD=G: 
A= J=2 

NEXT: RETURN 
B=INT(A/C6):PRINT MIDS (HS 
,B+1,1) ;:B*A-B*C6:PRINT M 
1D§(H$,B+1,1) ;:RETURN 

A=INT (AD/Z6) :GOSUB350:A=A 
D~A"Z6:GOSUB350: PRINT": "; 
CK=INT (AD/Z6) :CK=AD-24*CK 
+2Z5* (CK>Z7) :GOT0393 
CK=CK*2Z2+Z5* (CK>Z7) +A 
CK=CK+25* (CK>25) RETURN 
PRINT" {DOWN}STARTING AT 
$4"; :GOSUB300:1F INS<>NS 
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MLX 





418 
420 


430 
440 


456 


460 


470 
486 


485 


cM 


487 
MP 496 
Ke 560 


510 
52) 


530 


546 


560 


PK 570 





HI 586 


QO 599 


608 
61g 


620 


639 


658 
650 


660 
670 


68g 
695 


708 











THEN GOSUB1030:IF F THEN 
400 


RETURN 
PRINT" {RVS} ENTER DATA "=: 
GOSUBAGG:Te “XNS=NGITHENZZ 
OPEN3, 3: PRINT 
POKE198,0:GOSUB360:IF F T 
HEN PRINT INS:PRINT"{UP) 
{5 RIGHT}"; 

FOR 1=0 T0 24 STEP 3:B§=S 
S:FOR J=1 TO 2:1F F THEN 
{SPACE}BS=MID$(INS$,1+J3,1) 
PRINT" (RVS}"BSLS;:IF 1<24 
THEN PRINT"{OFF}"; 
GET AS:IF AS=N$ THEN476 
IE (AS>"/"ANDAS<"z")OR(AS> 
"@"ANDAS<"G")THENS4G 
As-(AS="M") =: 








"JM) L6* (AS=™K") 
-7* (AS="L") -8* (AS=' 
-9* (AS="0")-10* (AS="I")-1 
1* (AS="0")-12* (AS="PM) 
A=A-13*(AS=SS) :IP A THEN 
{SPACE }AS=MIDS ("ABCD123E4 
56FG",A,1):GOTO 540 

IP AS=RS$ AND((I=6)AND(J=1 
)OR F)THEN PRINT BS;:J=2: 
=24:GOTO553 
"(HOME)" THEN PRINT 
=24:NEXT:P= 








@:coT0446 

IF (AS="{RIGHT}")ANDP THEN 
PRINT BSL$;:GOTO546 

IF AS<>LS AND AS<>DS OR(( 
I=6) AND (J=1))THEN GOSUB1G 
60:G0T0470 
AS=LS+SS+L$:PRINT BSLS;:3 
=2-J:1F J THEN PRINT L$ 
I=1-3 

PRINT AS;:NEXT J:PRINT SS 








:PRINT" {UP} 
INPUT#3, INS:T 
PB INS=NS*THEN CLOSE3:GOTO 
226 
FOR I=1 T0 25 STEP3:BS=MI 
DS$(INS$,I) :GOSUB32G:IF I<2 
5 THEN GOSUB380:A(I/3)=A 
NEXT:IF A<>CK THEN GOSUBL 
G60:PRINT"{BLK}{RVS} ERRO 
Rz REENTER LINE {4}":F=1: 
GoT0446 
GOSUB1080:B=BS+AD-SA:FOR 
{SPACE}1=@ TO 7:POKE B+I, 
A(T) NEXT 
AD*AD+8:IF AD>EA THEN CLO 
SE3: PRINT" {DOWN} {BLU}** & 
ND OF ENTRY **{BLK} 
{2 DOWN}":GOTO79B 
=9:GOTO445 
PRINT" {CLR}{DOWN}{RVS} DI 
SPLAY DATA ":GOSUB4GG:IF 
{SPACE}INS=NS THEN220 
PRINT" {DOWN} {BLU} PRESS: 
{RVS}SPACE{OFF} TO PAUSE, 
{RVS}RETURN{OFF} TO BREA 
K£4}{DOWN}" 
GOSUB366:B=BS+AD-SA:FORI= 
BTO B+7:A=PEEK (I) :GOSUB35 
§:GOSUB38G:PRINT S$; 
NEXT: PRINT"{RVS}"; 2A=CK:G 
OSUB35G: PRINT 
P=1:AD=AD+8:IF AD>EA THEN 
PRINT" {DOWN} {BLU}** END O 
F DATA **":GOTO220 
GET AS:IF AS=R$ THEN GOSU 
B1686:GOT0228 
TE AS=S$ THEN P=F+1:GOSUB 
1980 
ONFGOTO630,660, 630 
PRINT" {DOWN} {RVS} LOAD DA 
TA ":0P=1:GOTO718 
PRINT" {DOWN} {RVS} SAVE FI 
LE ":0P=6 














RX 
PR 
FP 
HQ 


sQ 
Fo 


PE 


FC 


Gs 


MA 


GE 
RX 
PA 
FQ 


SA 


GQ 
EJ 


HI 


cs 


sc 


KM 
JE 


AE 


xP 


ER 


pp 


PP 


GR 


FD 


RX 


FE 


FX 


HA 


16 


728 


730 


740 


758 


760 


776 


780 


798 
800 


81g 
820 


836 


B48 


850 


860 


870 
880 


900 


910 


926 
930 


940 


950 


960 


976 


980 


998 


1900 
1gia 


1920 


1036 
194¢ 


INS=NS: INPUT" {DOWN} PILENA 
ME{4}";INS:IF INS=N$ THEN 
226 

F=G:PRINT" {DOWN} {BLK} 
{RVS}T{OFF}APE OR {RVS}D 
{OPF}ISK: £43"; 

GET AS:IP AS="T"THEN PRIN 
oro Baa. 

IF AS<>"D"THEN730 
PRINT"D{DOWN}":OPEN15, 8,1 
B=EA-SAzINS="02"+ 
EP OP THENS1O 

OPEN 1,8,8,INS+",P,W":GOS 
UBB6G:IF A THEN226 

AH=INT (SA/256) :AL=SA-(AH* 
256): PRINT#1,CHRS (AL) ;CHR 
S$ (AH); 

FOR I=G TO BrPRINT#1,CHRS 
(PEEK (BS+I));:1F ST THENS 
go 











NEXT:CLOSE1:CLOSE15:GOTO9 
40 


GOSUB1@60:PRINT" {DOWN} 
{BLK}ERROR DURING SAVE: 
{4}":GOSUBB60:GOTO220 
OPEN 1,8,8,INS+",P,R":GOS 
UB86G:IF A THEN226 
GET#1,A$,BS:AD=ASC(AS+Z5) 
+256*ASC(BS+Z$) :1F AD<>SA 
THEN F=1:GOTO85¢ 
FOR I= 70 B:GET#1,AS:POK 
E BS+I,ASC(AS+ZS$) :IF(1<>B 
)AND ST THEN F=2:AD=I:I=B 
NEXT:IF ST<>64 THEN F=3 
CLOSE1:CLOSE15:0N ABS(F>0 
)+1 GoT0960,970 
INPUT#15,A,AS:IF A THEN C 
LOSE1:CLOSE15:GOSUB1060:P 
RINT" {RVS}ERROR: "AS 
RETURN 
POKE183, PEEK (PA+2) : POKE18 
7 PEEK (PA+3) : POKE188 , PEEK 
(PA+4) : IFOP=GTHEN926 

SYS 63466: 1F (PEEK (783) AND 
1)THEN GOSUB1G6G:PRINT" 
{DOWN} {RVS} PILE NOT FOUN 
D ":GOTO690 
AD=PEEK (829) +256*PEEK (830 
):IF AD<>SA THEN F=1:GOTO 
970 
A=PEEK (831) +256*PEEK (832) 
-1:P=F-2* (A<EA) -3* (A>EA) = 
AD=A-AD:GOTO939 
A=SA:B=EA+1:GOSUB1010:POK 
£780,3:SYS 63338 
A=BS:B=BS+(EA-SA) +1:GOSUB 
1G1@:0N OP GOTO95G:s¥S 63 
591 
GOSUB108G: PRINT" {BLU}** S 
AVE COMPLETED **":GOT0220 
POKE147,@:SYS 63562:1F ST 
>8 THENS76 
GOSUB1@8@:PRINT"{BLU}** L 
OAD COMPLETED **":GOTO220 
GOSUB1060:PRINT" {BLK} 
{RVS}ERROR DURING LOAD: 
{DOWN} {4}":0N F GOSUB98G, 
998,1966:GOTO226 

PRINT" INCORRECT STARTING 
{SPACE}ADDRESS (";:GOSUB3 
60: PRINT") ": RETURN 
PRINT"LOAD ENDED AT ";:AD 
=SA+AD:GOSUB360:PRINT DS: 
RETURN 

PRINT"TRUNCATED AT ENDIN 
G ADDRESS": RETURN 

AH=INT (A/256) :AL=A-(AH*2 
56) :POKE193,AL:POKE194,A 




















H 
AH=INT (B/256) :AL=B-(AH*2 
56) :POKE174,AL:POKE175,A 
H:RETORN 

If AD<SA OR AD>EA THEN1G 
50 

IE(AD>511 AND AD<4@960)0 
R(AD>49151 AND AD<53248) 
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HC 1050 


AR 1960 


DX 1676 
PF 16898 


ac 1098 


THEN GOSUB108@:F=0:RETUR 
N 


GOSUB1060:PRINT"{RVS} IN 
VALID ADDRESS {DOWN} 
{BLK}":F=1: RETURN 

POKE SD+5,31:POKE SD+6,2 
@8:POKE SD,240:POKE SD+1 
,A:POKE SD+4,33 

FOR S=1 TO 100:NEXT:GOTO 








OKE SD+6,24 
3POKE SD+1,90 


:POKE SD+4,17 
FOR S=1 TO 100:NEXT:POKE 


SD+4,0:POKE SD,@:POKE S 
D+1,0: RETURN 





128 MLX 


AE 100 


xP 110 


FB 120 


KE 130 


JB 140 


FJ 150 


GQ 160 


FE 170 


DK 180 


198 


210 


De 226 


HB 238 


AP 248 


SX 250 


EA 260 


PP 27 


TRAP 960:POKE 4627,128:DI 
M_NLS,A(7 
22=2:24=254:25=255:26=256 
327=127:BS=256*PEBK (4627) 
EA=65280 
BES=CHRS (7) :RTS=CHRS$ (13): 
DLS=CHRS (20) :SPS=CHRS (32) 
LP S=CHRS (157) 

DEF FNHB(A)=INT(A/256) = be 
FP PNLB(A) =A-PNHB (A) *25| 
EF PHAD (A) “PEEK (A) -256*PE 
EK(A+1) 

KEY 1,"A":KEY 3,"5":KEY 5 
e"C":KEY 7,"D":VOL 15:1F 
{SPACE}RGR(G)=5 THEN FAST 
PRINT" {CLR}"CHRS (142) ;CHR 
$(8):COLOR @,15:COLOR 4,1 
5:COLOR 6,15 

PRINT TAB(12)"{RED)}{RVS) 
{2 SPACES}{9 @}{2 SPACES} 
"RTS; TAB (12) "{RVS} 

{2 SPACES} {OFF} {BLU} 128 
{SPACE]MLX (RED}(RVS) 

{2 SPACES}"RTS;TAB(12)" 
{RvS}{13 SPACES} (BLU}" 
PRINT"{2 DOWN}(3 SPACES}C 
OMPUTE!'S MACHINE LANGUAG 
£ EDITOR{2 DOWN)" 

PRINT" (BLK}STARTING ADDRE 
SS{4}";:GOSUB 260:IF AD T 
HEN SA=AD:ELSE 180 
PRINT"{BLK}{2 SPACES}ENDI 
NG ADDRESS{4}";:GOSUB 260 
IE AD THEN EA=AD:ELSE 19 

















8 
PRINT"{DOWN} {BLK}CLEAR WO 
RKSPACE [¥/N] ?{4}":GETKEY 
AS:IF AS<>"Y" THEN 220 
PRINT" (DOWN} {BLU} WORKING. 
JANK G:FOR A=BS TO B 
§+(BA-SA)+7:POKE A, G:NEXT 
A:PRINT"DONE":REM CLEAR 
{SPACE} MEMORY 
PRINT TAB(1@)"{DOWN}{BLK) 
{RVS} MLX COMMAND MENU 
{4}{DOWN}":PRINT TAB(13)" 
{RVS}E{OPE}NTER DATA"RTS; 
‘TAB (13) "{RVS}D{OFF}ISPLAY 
DATA"RTS;TAB (13) "{RVS}L 
{OFF}OAD FILE" 
PRINT TAB(13) "{RVS}S{OFF} 
AVE FILE"RTS$;TAB(13)" 
{RVS}C{OFF}ATALOG DISK"RT 
$;TAB (13) "{RVS}Q{OFF}UIT 
{DOWN} {BLK}" 
GETKEY A$:A=INSTR("EDLSCQ 
",A§):0N A GOTO 340,550,6 
49,650,936,940:GOSUB 950: 
GOTO 249 
PRINT"STARTING AT 
26021 (AD<>G) OR(AS=NLS)T 
HEN RETURN:ELSE 250 
AS=NLS: INPUT AS:IF LEN(AS 
)=4 THEN AD=DEC(AS):REM F 
ETCH ADDRESS 
IF AD=@ THEN BEGIN:IF AS< 
NLS THEN 300:ELSE RETURN 





























QB 
EB 


xB 


oP 


Ps 


GB 


HA 


DP 


BA 


AR 


Dx 


xB 


cA 


QP 


JE 


XA 


Da 


280 
298 
308 
310 
320 


336 
340 


350 
360 


370 


380 


398 


400 


410 


420 


430 


440 


450 


460 


470 
480 


490 


500 


516 


520 


530 
540 


556 


560 


5708 
580 


599 





?BEND 
IP AD<SA OR AD>EA THEN 30 
6 
TF AD>511 AND AD<65280 TH 
EN PRINT BES;:RETURN 
GOSUB 950:PRINT"{RVS} INV 
ALID ADDRESS {DOWN} {BLK}" 
:AD=G: RETURN 
CK=ENHB (AD) :CK=AD-24*CK+Z 
5*(CK>Z7) :GOT0 330 
CK=CK*22+25* (CK>Z7) +A 
CK=CK+Z5* (CK>Z5) RETURN 
PRINT BES;"{RVS} ENTER DA 
TA ":GOSUB 250:IF AS=NLS 
{SPACE}THEN 220:REM E OPT 
ION 
BANK G:PRINT:P=G:0PEN 3,3 
GOSUB 310:PRINT HEX$(AD) + 
:";21E F THEN PRINT L$:P 
RINT"{UP}{5 RIGHT)"; 

FOR I=G TO 24 STEP 3:BS=S 
PS:F0R J=1 TO 2:1F F THEN 
BS=MID$(L$,1+J,1) 
PRINT" {RVS}"BS+LFS; 

24 THEN PRINT"{OFF}"; 

GETREY AS:IF (AS>"/" AND 
{SPACE}AS<"=") OR(AS>"Q" 
(SPACE}AND AS<"G") THEN 4 
70 

IP AS="+" THEN A$="E":GOT 

0 478 

ITE AS="=" THEN AS="E":GOT 

0 478 

IF AS=RTS AND ((I=8) AND 
{SPACE} (J=1) OR F) THEN P 
RINT BS; :J=2:NEXT:I=24:G0 

TO 486 

IP AS="{HOME}" THEN PRINT 
B$:J=2:NEXT:1=24:NEXT:E= 
@:GOTO 360 

IE (AS="{RIGHT}") AND F T 

HEN PRINT BS+LFS;:GOTO 47 
a 

IF AS<>LF§ AND AS<>DLS OR 
((1=G) AND (J=1)) THEN G 

OSUB 950:GOTO 390 

AS=LES+SPS+LES:PRINT BS+L 

P$;:d=2-J:1F J THEN PRINT 
LES; :1=1-3 

PRINT AS$;:NEXT J:PRINT SP 














F I< 





Si 
NEXT I: PRINT: PRINT" {UP} 
{5_RIGHT}";:L$=" 





{27 SPACES}" 

FOR, I=1 TO 25 STEP 3:GET# 
3,A$,BS:1F AS=SP$ THEN I= 
25:NEXT:CLOSE 3:GOTO 220 
AS=A$+B$:A=DEC (AS) :MID$(L 
$,1,2)=AS:IE I<25 THEN GO 
(1/3) =A:GET#3,AS 
IF A¢SCK THEN GOSU 
B 95G:PRINT:PRINT"{RVS} E 
RROR: REENTER LINE " 
GoTo 360 

PRINT BE$:B=BS+AD-SA:FOR 
{SPACE}I=G TO 7:POKE B+I, 
A(1) 3NEXT I 
P2Q:AD=AD+8:1F AD<=EA THE 
N 360 

CLOSE 3:PRINT"{DOWN} {BLU} 
** END OF ENTRY **{BLK} 
{2 DOWN}":GOTO 659 

PRINT BES; "{CLR} {DOWN} 
{RVS} DISPLAY DATA ":GOSU 
B 25G:1F AS=NL$ THEN 220: 
REM SHOW OPTION 

BANK @:PRINT" {DOWN} {BLU}P 
RESS: {RVS}SPACE{OFF} TO 
{SPACE}PAUSE, {RVS}RETURN 
{OPF} TO BREAK{4}{DOWN}" 




















PRINT HEXS (AD) +":"; :GOSUB 
310:B=BS+AD-SA 
FOR I=B TO B+7:A=PEEK(I 





PRINT RIGHTS (HEXS(A) ,2);5 
P$;:GOSUB 320:NEXT I 
PRINT" (RVS}"; RIGHTS (HEXS ( 





GR 


EB 
OK 
xs 
BQ 


JA 


DM 


GA 


ED 


Px 


KB 


RQ 


ER 


Qo 


DP 
EB 


FP 


KS 


xx 


FG 


6a6 


619 


620 


630 


649 


650 


665 
670 


68a 


690 
700 
7110 


720 


730 


740 


750 


760 


776 


780 


730 


800 


81d 


820 
839 


B40 
850 


860 


870 


CK) 2) 

P=1:AD=AD+8:IF AD>EA THEN 
PRINT" {BLU}** END OF DAT 
A **":GOTO 226 

GET AS:IF AS=RT$ THEN PRI 
NT BES:GOTO 220 

IE AS=SPS$ THEN F=F+1:PRIN 

7 BES; 

ON F GOTO 576,610,576 
PRINT BES"{DOWN}{RVS} LOA 





D DATA =1:GOTO 660:RE 
M LOAD OPTION 
PRINT BES"{DOWN}{RVS} SAV 








E PILE P=0:REM SAVE OP 
TION 
F=0:PS=NLS$: INPUT" FILENAME 


{4}";ES:IF FS=NL$ THEN 22 
a 


IF LEN(F§)>14 THEN 660 
PRINT" {DOWN} {BLK} {RVS)T 
{OFF}APE OR {RVS}D{OFF}IS 
Kz £43"; 

GETKEY AS:IF AS="I" THEN 
{SPACE}85G:ELSE IF A$<>"D 
“THEN 680 
PRINT"DISK{DOWN}":IF OP T 
HEN 760 

DOPEN#1, (FS+",P") ,W:IP DS 
THEN A§$=D$:GOTO 748 
BANK @:POKE BS-2,ENLB(SA) 
:POKE BS-1,FNHB (SA) : PRINT 





"SAVING :PRINT 
FOR A=BS-2 TO BS+EA-SA:PR 
INT#1,CHRS$(PEEK(A));:IF S 





1 THEN AS="DISK WRITE ERR 
OR":GOTO 750 
NEXT A:CLOSE 1:PRINT" 
{BLU}** SAVE COMPLETED WI 
THOUT ERRORS **":GOTO 220 
IF DS=63 THEN BEGIN:CLOSE 
1:INPUT"{BLK}REPLACE EXT 
STING FILE [¥/N]{4}";AS:T 
F AS="¥" THEN SCRATCH (PS) 
:PRINT:GOTO 700:ELSE PRIN 
‘T"{BLK}":GOTO 666:BEND 
CLOSE 1:GOSUB 950:PRINT" 
{BLK} {RVS} ERROR DURING. S 
AVE: {4}":PRINT AS:GOTO 2 
20 
DOPEN#1, (FS+",P"):IP DS T 
HEN A$=DS$:F=4:CLOSE 1:GO 
TO 798 
GET#1,A$,B$:CLOSE 1:AD=AS 
C(AS) +256*ASC(BS):IF AD<> 
SA THEN F=1:GOTO 790 
PRINT"LOADING ";FS:PRINT? 
BLOAD (FS) ,BG,P(BS) :AD=SA+ 
FNAD (174) -BS-1:F=~2* (AD<E 
A) -3* (AD>EA) 
IF F THEN 800:ELSE PRINT" 
{BLU}** LOAD COMPLETED WI 
THOUT ERRORS **":GOTO 220 
GOSUB 950:PRINT" {BLK} 
{RVS} ERROR DURING LOAD: 
{SPACE}{4}":0N F GOSUB 81 
G,820,830,840:GoT0220 
PRINT" INCORRECT STARTING 
{SPACE}ADDRESS (";HEXS (AD 
)7")"sRETURN 
PRINT"LOAD ENDED AT ";HEX 
$(AD) RETURN 
PRINT" TRUNCATED AT ENDING 
ADDRESS ("HEXS(EA)")":RE 
TORN 
PRINT"DISK ERROR ";AS:RET 
URN 
PRINT" TAPE": AD=POINTER (FS 
) BANK 1:A=PEEK(AD) :AL=PE 
BK (AD+1) :AH=PEEK (AD+2) 
BANK 15:SYS DEC("FF68") ,O 
,1:SYS DEC("FFBA"),1,1, 
SYS DEC("EFBD") ,A,AL, AH: 
¥S DEC("FF96") ,128:IF OP 
{SPACE}THEN 893 
PRINT:A=SA:B=EA+1:GOSUB 9 
20:SYS DEC("E919") ,3:PRIN 














AB 


ce 


GQ 


sD 


xB 


AG 


880 


898 


900 


916 


920 


93 


940 


950 
96 


976 
980 
990 


T"SAVING ";FS 
A=BS:B=BS+(EA-SA) +1:GOSUB 
920:S¥S DEC("EA18") :PRIN 
T"{DOWN}{BLU}** TAPE SAVE 
COMPLETED **":GOTO 226 
SYS DEC("E99A") :PRINT:IF 
{SPACE}PEEK(2816)=5 THEN 
{SPACE}GOSUB 950: PRINT" 
{DOWN} {BLK} {RVS} FILE NOT 
FOUND ":GOTO 220 
PRINT"LOADING {DOWN}": 
AD=FNAD (2817) :IF AD<>SA T 
HEN F=1:GOTO 890:ELSE AD= 
PNAD (2819) -1:F=-2* (AD<EA) 
-3* (ADDEA) 
A=BS:B=BS+ (EA-SA) +1:GOSUB 
92G:S¥S DEC("E9PB"):IF S 
120 THEN 800:ELSE 799 
POKE193,FNLB(A) :POKE194,F 
NHB(A):POKE 174,PNLB(B) :P 
OKE 175,FNHB(B) : RETURN 
CATALOG: PRINT" {DOWN} {BLU} 
** PRESS ANY KEY FOR MENU 
**"=:GETKEY AS:GOTO 220:R 
EM DISK DIRECTORY OPTION 
PRINT BES"{RVS} QUIT {4}" 
7RTS;"ARE YOU SURE [Y/N]? 
":GETKEY AS:IF AS<>"¥" TH 
EN 22G:ELSE PRINT"{CLR}": 
BANK 15:END 
SOUND 1,500,10:RETURN 
TE ER=14 AND EL=260 THEN 
{SPACE}RESUME 308 
IF ER=14 AND EL=500 THEN 
{SPACE}RESUME NEXT 
IF ER=4 AND EL=780 THEN F 
=4:AS=DS$:RESUME 800 
IF ER=30 THEN RESUME:ELSE 
PRINT ERRS(ER);" ERROR I 
N LINE";EL & 
































‘This i your brat, 
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Each month, COMPUTE!’s Gazette pub- 
lishes programs for the Commodore 128 
and 64, Each program is clearly marked 
by title and version, Be sure to type in 
the correct version for your machine. All 
64 programs run on the 128 in 64 mode. 
Be sure to read the instructions in the 
corresponding article. This can save time 
and eliminate any questions which 
might arise after you begin typing. 

We regularly publish two pro- 
grams designed to make typing easier: 
The Automatic Proofreader, for BASIC 
programs, and MLX, for entering ma- 
chine language programs. 

When entering a BASIC program, 
be especially careful with DATA state- 
ments as they are extremely sensitive to 
errors, A mistyped number in a DATA 
statement can cause your machine to 
“lock up” (you'll have no control over 
the computer), If this happens, the only 
recourse is to turn your computer off 
and then on, erasing what was in mem- 
ory. This could cause you to lose valu- 
able data, so be sure to save a program 
before you run it. If your computer 
crashes, you can always reload the pro- 
gram and look for the error. 


When You Read: Press: See: 





{CLR} 
{HOME} 
{uP} 
{DOWN} 
{LEFT} 
{RIGHT} 


CLR/HOME 





[ CLRIHOME | 




















{RVs} 
{OFF} 
(BLK) 
{WHT} 
{RED} 
{CYN} 
































How to Type In 


Special Characters 

Most of the programs listed in each is- 
sue contain special control characters. 
To facilitate typing in any programs 
from Gazette, use the following listing 
conventions, 

The most common type of control 
characters in our listings appear as 
words within braces: {DOWN} means 
to press the cursor-down key; {5 
SPACES} means to press the space bar 
five times. 

To indicate that a key should be 
shifted (hold down the SHIFT key 
while pressing another key), the char- 
acter is underlined. For example, A 
means hold down the SHIFT key and 
press A, You may see strange characters 
on your screen, but that’s to be expect- 
ed. If you find a number followed by an 
underlined key enclosed in braces (for 
example, {8 A}), type the key as many 
times as indicated (in our example, en- 
ter eight shifted A’s). 

If a key is enclosed in special 
brackets, 9, hold down the Commo- 
dore key (at the lower left corner of the 
keyboard) and press the indicated 
character, 





















































When You Read: Press: 
{PUR} CTA EE) 
{GRN) crrt| [6 
{pL} crrt | [7 
{vet} crrt | [8 
{Ft} i 
{Rr} suit] [a 
(6B) B 
tm) suit] [ 6 
(rs) 5 
(F6) srt] [5 
{F7} 7 
{FB} [suter] [7 1] 
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Rarely, you'll see a single letter of 
the alphabet enclosed in braces. This 
can be entered on the Commodore 64 
by pressing the CTRL key while typing 
the letter in braces, For example, {A} 
means to press CTRL-A. 


The Quote Mode 

Although you can move the cursor 
around the screen with the CRSR keys, 
often a programmer will want to move 
the cursor under program control. This 
is seen in examples such as {LEFT} and 
{HOME} in the program listings. The 
only way the computer can tell the dif- 
ference between direct and programmed 
cursor control is the quote mode. 

Once you press the quote key, 
you're in quote mode. This mode can be 
confusing if you mistype a character 
and cursor left to change it. You'll see a 
graphics symbol for cursor left, In this 
case, you can use the DEL key to back 
up and edit the line. Type another quo- 
tation mark and you're out of quote 
mode. If things really get confusing, 
you can exit quote mode simply by 
pressing RETURN. Then just cursor up 
to the mistyped line and fix it, 














When You Read: Press: See: 
< ea = 
u [our] a 
For Commodore 64 Only 
gg [coumonons] [11] FF 
E29 [commovore| | 2 | fi 
R33 [commopore|| 3 | i 
Rad {commonore|| «| fir 
sg sOMMO Es 
Bog 
7] 
Es] 




















Note: Only selected titles are 
listed in contents for each 
Issue 


1987 

January—Keyword Construction Set, One- 
Touch Function Key, GEOS Icon Changer, 
CP/M: Surviving with 40 Columns 
February—Collision Course, Division 
Worksheet, MetaBASIC 64, MetaBASIC 128, 
128 DOS Wedge, 128 Sound & Music (Pt. 4) 
March—Ringside Boxing, Color Craft, 128 
RAM Expansion, CP/M RAM Expansion, 
Sprite Manager 

‘April—Omicron, Music Improvisor, Print 
Shop to GEOS, TurboSave 128, TurboSave 
64, Countdown Timer 

May—SpeedScript 3.0, Powerball, Cassette 
Sleeve Maker, No-SYS Loader, Fast Boot, 
Gameports 

June—Bingo, Fraction Practice, Free-Form 
Filer, Disk Vacuum, Hi-Res Graphics on the 
128 

July—Basketball Sam & Ed, Calendar 
Maker, Crash Prevention, 128 Graph De- 
signer, GEOS File Storage, Text Framer 
‘August—Bounty Hunter, Sprite Magic, Sprite 
Stamp, 80-Column Sector Editor (128), 
Relative Files 

September—Sub Attack, Exercise Pacer, 
Screen Maker, Impossible Scroll, Video Slide 
Show, 80-Column Magic 
October—SpeedScript 128, Chopper Pilot, 
Stars: A Simulation of the Heavens, Directory 
Magic, Font Printer, Animator 64 
November—Litterbug, Sketch Pad, Poster 
Printer, Renumber 64, Accessing the 128's 
80-Column Screen 

December—Crossroads, Snake Pit, Word 
Find, Animal Match, Disk Rapid Transit, 
PrintScreen, GeoTrash Restorer 





1988 

January—How to Buy a Modem, Buyer's 
Guide to Modems, Needlework Graphics Edi- 
tor, Tile Paint, Sound Manager 
February—Buyer's Guide to Graphics Pro- 
grams, Easy Load, Turbo SpeedScript, Fast 
64 Mode for the 128 


FOR ORDER INFORMATION AND FORM, SEE PAGE 


Corresponding monthly disks are available only for issues from January 1986 fi rwi rd, y 


COMPLETE YOUR 
COLLECTION! 
ANY ISSUE FOR $6! 


Issues not listed are 
sold out. Limited 
quantities available. 


Order today! 


March—CP/M Software for the 128 (Pt. 1), 
XPressCard 128, ML Cloner, Big Screen, 
Color Lister 

April—CP/M Software for the 128 (Pt. 2), 
3D Speedway, SpeedFile 64, Ramdisk 128, 
Mirrors 

May—Networking the 64, Guide to User 
Groups (Pt. 1), Treasure Diver, Mob Maker, 
128 Math Graphics, 1541 Speed & Alignment 
Tester 

June—Buyer's Guide to Printers, Guide to 
User Groups (Pt. 2), Arcade Volleyball, 
Excelfont-80 (128), Graphics Wedge 
July—Hard Disk Drives for the 64/128, Civil 
War on Disk, Quick Save, Error Analyzer, 
SYS Stamper 

August—MIDI Made Simple, Buyer's Guide 
to Music Software, Cribbage (128), 128 Shell 
Booter, 3-D Sprites, Zoom 
September—Write All About It! (desktop 
publishing), Pattern Fill, Multicolor Graphics 
Dump, SpeedCheck 128, Disk Package, 
MultiSort 128 

October—Commodore Goes Back to School, 
Buyer's Guide to Preschool Software, Scor- 
pion II, 64 Compressor, SpeedPrint, Speed 
Columns, 128 Text Sorter 
November—GEOS 2.0: A Major Upgrade, 
Buyer's Guide to Word Processors and Spell- 
ing Checkers, Rally Racer, Block Out (128), 
Sprite Killer, Notepad 64, Font Grabber 
(GEOS) 

December—88's Best Games, Ringside 
LXIV!, Crossroads II, Digi-Sound, Dynamic 
Windows, Quick! (1541 speedup), 1526 
PrintScreen, Key Lock 


FINITIVE REFERENCE 
COMMODORE USERS 





1989 

January—Guided Tour of Major Online Ser- 
vices, How to Get Published, Disc Blitz, 
Jewel Grab, 128 Animator, Smooth-Scrolling 
Windows, Handy Filer, Smart Disassembler 
February—Around the World with Com- 
modore, Buyer's Guide to Personal Publish- 
ing Software, Tank Ambush, Gridloc (128), 
‘The Great Arcade Machine, 1581 Alphabet- 
izer, Sound Wedge 

March—Dream to Reality: Simulation De- 
signers Speak Out, Buyer's Guide to Sports 
Games and Simulations, The Anglers, Bac- 
teria (128), Planebender, Bitmap Buster, 
Monthly Calendar, MultiView 
April—Designing Your Own Programs, 
Buyer's Guide to Programming Aids, Science 
Fiction on Disk, Space Worms, BASIC 10, 
File Saver (GEOS), Super Accelerator (128), 
Comparator 

May—Care and Feeding of Dot-Matrix Print- 
ers, Fantasy on Disk, Guide to User Groups 
(Pt. 1), Knock 31, Hi-Res Windows, RAM 
Wedge 128, Super Slideshow, Quick Print, 
Close-up: GEOS 128 2.0 

June—Best Arcade Sports Games, Guide to 
User Groups (Pt. 2), Match Mania, Jericho 
Il, Hi-Res 80 (128), SpeedCount, Macro- 
BASIC (64/128), Grafix Converter, GEOS 
Help Pad 

July—Speakers, Stereo, and MIDI Solutions; 
Mine Sweeper, Monster Bar-B-Q (128), Math 
Magic, CHRS Graphics, Financial Planner, 1581 
Directory Sorter, GEOS File Retriever 
August—Here Come the Coin-Ops!, Explore 
Your 641, Stars II, Disk Doubler (64/128), 
Quiz Maker (64/128), Sprite Fader 64, 
80-Column Graphics (128), Screen Splitter, 
Notepad 128, Sprite Clock, Marathon (128) 
September—Call Your User Group, Com: 
modore’s Back in the Classroom, Block 
Battle!, Wham Ball, 64 Animator, SpeedScript 
128 Plus, Memo Card, Slideshow (GEOS), 
MR Scribble, EZ Bar Charter, On the Border 
(border routines) 

October—Tips for Desktop Publishers, Slap 
Shot, Backdrops, Boot Maker, RGB kit (128), 
128 Graphics Compactor, Triple Search, Text 
Screen Editor, Diamonds, Disk Usage (GEOS) 
November—Super Power Boosters, Cartridge 
Power!, White Water, DP BASIC, SpeedScript 
Easy Cursor, Copy 81, Flash Card, Universal 
Input, Turbo Format (GEOS), Vertical 
Scroller 
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SCORE BIG! 


with these new books from COMPUTE! 


THE OFFICIAL 
iol i= ae 
STEALTH 
FIGHTER 


TURN & BUR} 





rom COMPUTE! Books, the 

leader in entertainment soft- 

ware books, come six new 

titles to put sizzle in your 
game play. You'll find everything 
from how to improve your scores, 
to helpful commentary from pro- 
fessionals, to secret information only 
you will know after reading these 
titles. 

Just when you're ready to throw 
in the towel, get tips for high scores 
and conquest, insider clues, and step- 
by-step solutions. 

And when you want to take a 
break from the fast pace of game 
playing, COMPUTE! goes beyond 
high scores with histories, photo- 
graphs, and observations about the 
software, Learn about the early days 
of the stealth fighter, the best games 
to buy, and the best maneuvers to 
get you where you want to be. With 
COMPUTE! Books, you've got the 
ticket to SCORE BIG! 


T 
[ ATOR 
ODYSSEY 


(egOMPIIT ook 


Mail to: Chilton Book Company, Chilton Way, Radnor, PA 19089 























ATTN: COMPUTE! Books/1-800-345-1214 or 215-964-4000 
ao DC = Co = = eS a 
COMPUTE!’s Guide to 221-4 $995 —_ Hints, Maps, and Solutions to 220-6 $16.95 ___ 
Nintendo Games Computer Adventure Games 
A Flight Simulator Odyssey 177-3 914.95" The Official F-79 Stealth Fighter 217-6 $14.95 ___ 
Flight Simulator or Flight Simulator Handbook 
W required 
Turn & Burn: The Authoritative 197-8 $12.95 ———— 
The Official Book of King’s Quest 155-2 $10.95 —___ Guide to Falcon 
Gl Rayment encioees. Rosidonts of AL, AR, AZ, CA, CT, DC, FL, GA, 1A, IL, KS, LA, MA, MD, 
ME, Ml, MN, MO, NJ, NV, NY, OH, OK, PA, Rl, SG, TN, TX, UT, WA, 
Charge CVisa CO MastorCard WI, and WY add applicable sales tax. 
‘Acct. No Exp. Date ‘Shipping & handing: $2.50 for frst book and $:50 each additional 
Signature — Total payment 
Name Al orders must be prepaid (check, charge, or money order). 
Address Al payments must be i US funds. 
Cty. Stato, Zip. 


Prices and availabilty subject to change, 
*Alow 4-6 wooks tor delivery 














COMMODORE CLIPS 


NEWS, NOTES, AND NEW PRODUCTS 


Edited by Mickey McLean 
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Alive and Well in Toronto 
The Commodore 64 and 128 are slowly being supplanted by the Amiga line of 
computers, but at the World of Commodore show in Toronto last December, 
the 8-bit wonders were as strong as ever, Although there was, no new 64/128 
software announced, dealers were selling old and current titles at a brisk pace, 
Gazette's line of 64 and 128 disk products was also a big hit with attendees. We 
also boosted our reader base in Canada with many new subscribers, 

Commodore's large booth in the Toronto International Centre showcased 
its Amiga and PC lines, but intermingled with the newer machines were 645 
and a 128D. Renown 64 expert and Gazette columnist Jim Butterfield also led 
seminars on how to get the most out of your Commodore computer, 

Our representatives at the show were pleased to run into many old friends, 
including readers who have been with us since our inception in 1983. 


Computer Toys 

Fisher-Price has joined forces with software publisher GameTek (2999 North- 
east 191st Street, Suite 800, North Miami Beach, Florida 33180) to produce six 
educational computer games for children ages 3-8, Each game is based on a 
popular Fisher-Price toy. 

My Grand Piano ($14.95), a music program, teaches basic piano theory and 
music notes while entertaining children with 30 songs such as “Mary Had a 
Little Lamb” and “London Bridge.” In Bowling Alley ($14.95), children learn 
basic math, coordination, and spatial relationships in a bowling game featuring 
curve balls, computer scoring, and sound effects. The role-playing game, School 
Bus Driver ($14.95), teaches navigation and memory skills as children pick up 
Fisher-Price Little People at bus stops and drive them to school. Children can 
develop number-recognition and visual-recall skills with | Can Remember 
($14.95). In Firehouse Rescue ($14.95), children assume the role of firefighter, 
driving a fire truck and rescuing Little People and their cat while learning coor- 
dination and decision making. Children can develop skills in picture and shape 
recognition with Perfect Fit ($14.95). This match-and-fit game features sound 
effects and puzzles involving Fisher-Price toys and has three levels of difficulty. 











: New, Fast Hard Drives 


The new HD Series Hard Drives from 
Creative Micro Designs (50 Industrial 
Drive, P.O, Box 646, East Longmead- 
ow, Massachusetts (1028) are de- 
signed to be the fastest mass-storage 
peripherals for the 64 and 128. 

Compatible with almost all com- 
mercial software titles, the drives have 
full GEOS and CP/M compatibility 
built in. The serial-bus interface sup- 
ports standard serial as well as high- 
performance Fast Serial and JiffyDOS 
protocols, The drives’ parallel port al- 
lows for connection to RAMLink, 
which enables even faster data trans- 
fer. The automatic head-parking fea- 
ture protects the drive mechanism and 
your data when the unit is off. 

The drives, about the same size 
as 1581 drives, are available in either 
20MB ($599.95) or 40MB ($799.95) 
capacities. Creative Micro can also 
customize drive capacity, or you can 
connect the HD Series drive to other 
SCSI drives for more storage capacity. 

The HD Series Hard Drives can 
also be interfaced with Amiga, IBM 
PC and compatible, and Macintosh 
computers. 








64 Conversions 


Cinemaware (4165 Thousand Oaks 
Boulevard, Westlake Village, Califor- 
nia 91362) has converted two of its 
most popular games over to the Com- 
modore 64. Now you can take to the 
gridiron with TV Sports: Football 
($29.95) and explore a fantasy world 
in Deathbringer ($29.95). Both titles 
are distributed by Electronic Arts. 

TV Sports: Football includes a 28- 
team league, a 16-game schedule, and 
postseason playoffs, You can choose 
from a variety of offensive and defen- 
sive formations and plays. Options in- 
clude a one- or two-player game and 
a practice mode, 

In Deathbringer, you take on the 
role of a Barbarian hero in a race 
against evil. Magical items found on 
your journey through dark castles, 
hidden forests, spooky towers, and se- 
cret temples help you on your quest, 


COMPUTE!’s Gazette March 1990 79 



















COMMODORE CLIPS 


NEWS, NOTES, AND NEW P 


New International Version of Landmark 

Landmark; The Computer Reference Bible ($119.95), previously available in the 
standard King James Version, has now been released in the New International 
Version of the Bible. The NIV comes with complete NIV footnotes, individual 
verse references, and the words of Jesus highlighted in red, Available from 
P.A.V.Y. Software (P.O. Box 1584, Ballwin, Missouri 63022), the NIV version 
carries an additional $10 royalty fee. 


Flamethrower 
Strategic Simulations (675 Almanor Avenue, Sunnyvale, California 94086) has 
released Dragons of Flame ($29.95), the second Advanced Dungeons & Dragons 
action game set in the Dragonlance game world. 

You must lead the eight Companions of the Lance on a quest through the 
wilderness of the Elven Mosaic, where they gain valuable allies—the elves 
of Qualinesti. The Companions must also ally with nonplayer characters 
such as nomads and refugee townsfolk and sneak through the caves of 
Sla-Mori and into the fortress of Pax Tharkas. Once inside the 
fortress, the Companions must recover the sword, 
Wyrmslayer, and free the slaves held there by the evil 
dragons and Draconians. 

Each companion has specialized skills that can be used 
to evade Draconian patrols and other evildoers and mon- 
sters. Ultimately, your goal is to triumph over evil and save 
the world of Krynn from Takhisis, the Queen of Darkness. 

A Dragon of Flame clue book is available for $7.95. The 
SSI game is distributed in North America by Electronic Arts. 


More Mindscape for the Money 
Arcade and sports fans can beef up their game libraries with two new zs 
money-saving collections from Mindscape (3444 Dundee Road, Northbrook, . 
Illinois 60062). Arcade Mega-Hits ($39.95) includes six popular arcade titles, ° 
while the sports collection ($34.95) contains four award-winning games : 
developed by SportTime. : 

Gauntlet and Paperboy, two big sellers on their own, are included in Arcade * 
Mega-Hits along with Indiana Jones and the Temple of Doom, Road Runner, and : 
Blockbuster. The sports package features Superstar Ice Hockey; Superstar Soccer; * 
Indoor Sports, which includes bowling, darts, air hockey, and Ping-Pong; and * 
Clubhouse Sports, which challenges you to foosball, billiards, skeeball, crazy . 
pool, pinball, and a shooting gallery. e 

In addition to the game packages, you can order Mindscape’s Powerplayers * 
joystick at a discounted price of $16.95. The joystick originally sold for $29.95. « 


Legendary Knights 
With Knights of Legend ($49.95) from Origin (136 Harvey Road, 
Building B, Londonderry, New Hampshire 03053), you'll take 
a journey through a medieval world consisting of intriguing 
quests. There are over 30 towns and hamlets to explore and 
you'll meet hundreds of unique and colorful personalities. 
Up to six companions can be created with customized 
weaponry and armor. Game features include a menu-and- 
icon interface, A play book, reference card, and map are 
included with the package. 


RODUCTS 


2400-Baud Modem 
Aprotek (9323 West Evans Creek 
Road, Rogue River, Oregon 97537) 
has released the Minimodem-C24 
($99.95), a 2400-baud modem for the 
Commodore 64 and 128, The C24 
features full- and half-duplex modes, 
autodial, autoanswer, autoredial, tone 
or adjustable pulse dialing, a data- 
voice-data switch, a volume- 
controlled on-board speaker, and a 
40-character buffer. 








To the Rescue 


You're a powerful warrior searching 
for his kidnapped princess in Savage 
($29.95) from Medalist International 
(180 Lakefront Drive, Hunt Valley, 
Maryland 21030). 

To rescue the princess, you must 
battle your way through three game 
scenarios, In the first, you have only a 
battleax to fight off evil creatures, 
You're on foot in the second level of 
play, avoiding obstacles as you race 
toward the castle where the princess 
is held captive. In the third and final 
level, you telepathically communicate 
with a magical eagle that flies through 
a mystical maze seeking to complete 
the quest. More creatures are present, 
attempting to thwart the final stage of 
the rescue. G 





Great Games 


64/128 
$2095 

Sale $22.95 
BZ-2141 
Grave Yardage-Activision 
Zombies, ogres, and goblins on 
the gridiron. Real football 
action that’s—well, unreal, 
Everything is legal, and the ball 
is alive... 


ARK He PAST Ue 
ae 


aA 





C64/128 
$29:95 
Sale $22.95 
BZ-1983 





Beyond Dark Castle-Activision 
Best arcade/strategy challenge. 14 
full-scrolling mazes, multiple skill 
levels, great graphics, an evil Black 
Knight—and a touch of humor! 





Activision 


Hacke 

Hacker II 

Shanghai 

Air Rally... 

‘Tass Times 

Marder on the Mississippi 
Borrowed Time 
Mindshadow 

‘Ocean Ranger 
‘Transformers ., 


Data East 
‘Tag Team Wrestling 
Gamestar 
Championship Basketball... BZ-LEAB 


.BZ-1004 


Baseball sn» BZ-1807 


Infocom 


64/128 
989-95 
Sale $27.95 
BZ-1229 





Battletech-Infocom 

Animated role-playing adven- 
ture with exciting battle action. 
Detailed story, setting with over 
4 million locations. 


c64/128 
$4405 
Sale $29.95 
BZ-2215 
Dragon Wars-Interplay 
Ultimate role-playing fantasy. 
Great story, over 120 monsters 
and spells, auto-mapping. 
Supports characters from 

Bard's Tale I, II, III. 





mi Sale $22.95 
BZ-2145, 
FaceOff-Gamestar 

Furious shoot-'n-fight hockey 
action, ShotCam and FightCam 
put you on goal and in the 
brawls, Playmaking, GM 
functions, league play, 


















AREA sant emer 
Hollywood Hijinx 

Moonmiat 

Plundered Hearts .. : 3 
Ballyhoo BZ-1408 
Cutthroats ,. BZ-1392 
Deadline soe BZ 1424 
Witness BZ-1498 
Zork I -BZ-1490 


1301 
BZ-1304 





BZ-2324 


064/128 
$20:95 

Sale $22.95 
BZ-2823 
Ghostbusters II-Activision 
Relive the hit film—sample slime, 
pilot Miss Liberty, battle Vigo. 
Arcade action, adventure, strategy 
recs laughs! 








W, ‘ti itt 
64/128 
$49:95 
i Sale $34.95 
See) 37.2155 


Knights of Legend-Origin 
Over 70 locales and 100's of 
characters in medieval fantasy 
role-playing. Compelling 
drama, comprehensive combat 
system, 


C64/128 

$40:95 

Sale $34.95 
BZ-2152 

Space Rogue-Origin 

3-D flight simulation and 
intriguing role-playing escapades. 
Seek your fortune, face alien foes, 
solve the mysteries of deep space. 





















Call for your free catalog. 


All games shown are for Commodore 64 and 128, 
Please call for availability on other systems, 


TRITON 


PRODUCTS COMPANY 
Cirelo Reader Service Number 188 
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GEOS USERS: 


THE WAIT IS 








For everyone who's ever waited a tad too long 
for a GEOS screen to itself or an appli- 
cation to load, congratulations. ‘The wait is over. 
Your chips have come in. 

The. GEORAM expansion board —for both 
64's and 128's—is here. 


MORE MEMORY, LESS WAITING. 


Developed exclusive 
Commodores, these 
able 512K of extra memory, which propel 
GEOS into light speed productivity. A 
ries pop up in an instant. ens redraw ina 
wink. And applications m out in a frenzy 
as you whip them along with your mouse or 
joystick. 

“An additional 
a really impre: 














-equipped 
an unbeliev- 















using GEOS, 
inate the 
encounter. 









—RunM 


Hard to believe? Believe it. GI 
transfer rate is literally 35 ti 





faster than the 
1541, 1571 or 1581 disk drive. Which has the 





try chattering almost as much as when 
first arrived on the scene: 





“The difference between ope: 
ing...on a 640K machine instea 
128K machine could be compared to 
flying a jet and walking. Tasks that 
would normally cause a delay while the 





The brightest minds are working with Berkeley. 












disk was ace! 
light... 


ssed run at the speed of 
— Commodore Magazine 








sn’t waste time spinning magnetic disks 
searching for dal 
That not only increases your machine's Ae 









iti 
better use drawing, writing or doing any ofthe 





thousands of things you're using GEOS for. 


“RAM expanded C-series machines... 
running under the GEOS kernel—are 


| Berkeley 
Softworks 





nearly as fast and flexible as the power- 
house Mac's, ST's, An 


—Computer Shopper 








So if you'd like to delete the delay, call us 
toll free at 1-800-888-0848 and order your 
GEORAM card today. You'll discover the 
difference in no tim 


“It's the same GEOS, but unle: 
perience RAM expansion, you can’t 
e the transformation. 
operations run a few s ds quicker, 
others (such as desk Top utiliti 
appear before 
RAM expander is the most cost 
purchase I’ve ever made. Try one, and 
you'll never go back to magnetic media’ 
—Computer Shopper 
























The GEORAM E 
been a long time coming, but 
been worth the wait. 


Not available in retail stores! 
No external power supply needed! 
*0n top of the 


insion Card, It may have 
efinitely 











sk turbo speed yeu already jt with GEOS, 
Mail orders te, 2ip and phone 
umber ang with check or money cer fo $24. pls 4.98 
ae to Herkeley Softworks (Do 
SxH 












1-800-888-0848 
extension 1745 


Circle Reader Service Number 157 


